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INTRODUCTION 


‘*La plupart des occasions de troubles du monde 
sont grammairiennes.” 


M. de MONTAIGNE. 


‘‘Automates pensants, mus par des mains divines. 
VOLTAIRE. 


Sur l'écran d’un micro-ordinateur quelconque du commerce, doté d’un 
ordinaire BASIC !, on peut, par simulation, doter des objets mobiles du 
sens de la vue, de l’ouïe,.… de l’odorat, et leur insuffler un comporte- 
ment surprenant, dans des situations imprévues, les hissant ainsi au niveau 
de robots doués d'Intelligence Artificielle (1.A.) 

La formule magique ainsi tombée, il faut se ressaisir, redescendre des 
Mille et Une Nuits vers les petits matins terrestres, revenir aux sources 
et s'interroger sur les mots, ces incontournables périphériques d'entrée 
et de sortie de nos idées. 

Prise littéralement donc, l'intelligence artificielle serait en quelque sorte 
une entreprise de contrefaçon d’un bien déjà surabondamment répandu 
sur la Terre et dont, de surcroît, on ignore la nature. 

Les faux-monnayeurs s’esbaudiraient d’un tel dessein : fabriquer des 
billets inimitables que tout le monde possède, risque immense et profit 
nul. 

Rares sont les inventions verbales aussi ambiguës que cette expression, 
et qui aient un tel succès. 

C'est qu’en psalmodiant cette superbe formule, le mortel ordinaire 
se hisse au niveau du génial sorcier qui la créa et entre ainsi gratuitement 
dans son palais; mais ce n’est alors qu’un palais des mirages, irréel et 
désert. 

Car “‘il est plus facile d'élever un temple que d’y faire descendre l’objet 
du culte ?”. 

Miracle pourtant, cette chose-là existe mais on ne sait exactement ce 
qu’elle est, et elle n’a aujourd’hui trouvé ni son vrai nom ni sa demeure. 


1. Les instructions les plus sophistiquées dont on aura besoin concernent le générateur de nom- 
bres aléatoires (RND) et les variables indicées à deux dimensions (DIM, f(m,n)) dont sont dotés 
tous les micro-ordinateurs, même en gamme moyenne. Sur moniteur monochrome, les couleurs 
choisies donnent une gamme de tons gris-vert. 

2. Samuel Beckett, L'Innommable, Éditions de Minuit. 
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Les précieuses pépites en sont disséminées et il faut marcher, monter, 
revenir, tomber puis creuser pour en recueillir parfois quelqu’une. Le pion- 
nier la regarde alors, perplexe, car il ne sait si elle est vraie ; d’autres pierres 
vulgaires lancent souvent des reflets aussi brillants, et même les experts 
s'y trompent. 

Le trésor gonfle cependant au soir de chaque étape, et demain l’on 
saura de mieux en mieux identifier les traits de l’inconnue lorsque les 
multiples colorations que les prismes actuels lui donnent en auront révélé 
l’incandescente lumière. Le moment viendra alors de lui donner en bap- 
tême son nom véritable, plutôt qu’un faux titre de gloire affublé d’un 
faux blason. Il faudra aussi que ce nom soit beau à entendre ; il faudra 
le tenir à l’abri des habituels et insupportables suffixes de la manitique, 
car cette chose-là sera faite de la substantifique moelle humaine, et non 
des apparents états d’âme d’une machine. 

Ce matin, adoptons le pseudonyme universel et partons joyeusement 
en quête de notre Arlésienne. L'aventure est maintenant plus facile car 
les chemins sont déjà défrichés, des escaliers aménagés dans le roc, des 
sites exploités, des lingots coulés à partir de fragments extraits d’inépui- 
sables mines. Le commerce commence à s’en emparer, attestant la valeur 
de la chose en ‘‘l’élevant au statut de marchandise ?””! 

Les pionniers marchent devant nous, parfois démunis mais toujours 
enthousiastes. Suivons-les, car ils sont dignes de l’admiration due à cette 
autre belle inconnue, l'intelligence naturelle, dont la majesté se passe 
de majuscules. Peut-être un jour serons-nous capables nous aussi de donner 
quelque coup de piolet, ajoutant un rai d’or à la naissante aurore. 

Le thème choisi pour cette incursion au pays de l’I.A., celui de petits 
bonshommes déambulants, tend à en faire plutôt une agréable excur- 
sion, en donnant aux concepts abstraits souvent utilisés en ce domaine 
des visages familiers et accessibles qui, loin d’affaiblir leur portée théori- 
que, la fortifient au contraire au contact d’une réalité tangible, simpli- 
fiée mais non déformée. 

Et puis cela change quelque peu des sujets habituels d'initiation, taquin, 
tic-tac-toe, reconnaissance de lettres, construction de systèmes experts rudi- 
mentaires, contre lesquels on ne peut formuler qu’un reproche : ils se 
fondent sur des exemples déjà abstraits pour éclairer des abstractions. Les 
robots baladeurs, quant à eux, sont en chair et en os, au premier degré 
du concret, comme seule le permet une merveille aussi abstraite que 
l’image vidéo. 

Je souhaite au lecteur, au fil des étapes, la même jubilation intérieure 
que celle ressentie lors de la création des minuscules personnages de ce 


3. ‘‘Les intelligences artificielles’, Sciences & Avenir, n° spécial 1985. 
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livre, avec leur univers rocambolesque, leurs perceptions de Petits Pou- 
cets, leur ténacité, l’optimisme surréaliste qui semble émaner de leur 
comportement et leur air de dire, provocateurs : ‘‘L’homme de génie est 
celui qui m’en donne 

Mais le plus surprenant dans la fréquentation des robots, c’est qu’ils 
finissent par nous donner de si curieuses idées sur les hommes. 


4. Paul Valéry, Mauvaises Pensées et Autres, Gallimard. 
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INVITATION AU VOYAGE AU PAYS 
DE L'INTELLIGENCE ARTIFICIELLE 


‘*.. le feu de ses prunelles pâles qui me 
contemplent fixement.….”” 


C. BAUDELAIRE. 
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Attention, terrain piégé, informatique-alibi, de drôles d'idées camou- 
flées sous le riant gazon du BASIC, autant prévenir. 

Au seuil de cet étrange voyage, il est nécessaire de préciser que la subs- 
tance du livre est directement accessible par son texte, indépendamment 
du cortège des programmes. Ces derniers n’ont qu’un rôle complémen- 
taire, celui d’agents doubles dans des services très spéciaux. D'abord, ils 
furent les embryons de l'ouvrage, des supports de réflexion et d’errance, 
des tremplins du possible et des témoins de l'impossible lorsque les limites 
de la machine, de sa langue et de son manipulateur s’avéraient atteintes. 

Ensuite, ces petits programmes auront une vocation démonstrative pour 
le cas où le lecteur ne croirait pas sur parole aux extravagants récits qu’on 
lui conte et, comme saint Thomas, préférerait y regarder lui-même de 
plus près. 

Enfin, et ce sera le troisième rôle des agents doubles, ils permettront 
d’exorciser le démon, celui du caractère prétendument artificiel de l’intel- 
ligence mise en œuvre, et de constater que les petites créatures qui se 
promènent sur l’écran sont comme nous des joueurs impénitents, on ne 
peut plus naturels. 

Le seul moyen d’assister effectivement à ces réjouissantes déambula- 
tions consiste à les concrétiser en programmes, mais cela sera facile 
lorsqu'on aura d’abord saisi l'essence, en langage clair, de ce qu’ils expri- 
ment en langage codé. 

Pour cette approche limitée mais vraie de l’Intelligence Artificielle, 
au sens ! qu’on lui donne aujourd’hui, la langue naturelle est la mieux 
capable de servir de premier guide, surtout la nôtre avec ses inépuisables 
ressources de clarté, de finesse, de souplesse et de puissance, son irrem- 
plaçable aptitude à exprimer les raisonnements formels ou les jeux infor- 
mels de l’esprit. 

Il faut en effet savoir que les langages actuels d'ordinateurs, même 
les plus évolués, les mieux structurés, les mieux adaptés — LISP, PRO- 
LOG... —, sont encore, malgré les immenses progrès qu'ils reflètent, 
pauvres et rigides et qu’ils requièrent un maniement rigoureux, au moins 
aussi artificiel que l'intelligence qu’on veut leur faire traduire. 

Ces défauts qui, n’en doutons pas, s’atténueront ?, concernent d’une 
part la représentation du monde réel sous des formes symboliques exploi- 
tables par un ordinateur : informations quantitatives et gwalitatives, don- 
nées, règles, ‘‘culture’”, c’est-à-dire tous les szpports de la pensée, et 
d'autre part le #raitement de ces représentations, c’est-à-dire /es moteurs 


1. On devrait dire ‘‘aux sens’” car, en ce domaine nouveau, on en est encore au stade du jaillis- 
sement et de la dispersion des-idées. 
2. E. Feigenbaum et P. McCorduck, Le Cinquième Génération, InterÉditions. 
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de la pensée : manipulation des connaissances, tri, classement, combi- 
naison, sélection, inférences ; ces deux opérations, représentation et trai- 
tement, permettant en fin de compte de #aîtriser une situation, finalité 
de tout acte intelligent. Bien entendu, le BASIC se situe lui-même au 
plus bas dans cette déjà courte échelle des valeurs. 

C'est pourquoi, pour traiter d’un sujet aussi délicat, il faut d’abord 
se servir de ce qui s’est fait de mieux comme langue : la nôtre. Sa beauté 
et ses pouvoirs sont infinis, tout détail y compte mais tout excès la ternit. 
Ainsi, l'étrange puissance simplificatrice du minuscule accent aigu, qui 
transfigure la musique et la signification des mots : l’on piège, mais on 
est piégé. 

Ce sont ses qualités mêmes qui la rendent redoutable, involontaire- 
ment par facilité ou sciemment par calcul. Mais, utilisée selon sa vraie 
vocation de clarté, ‘‘elle est la seule qui ait une probité attachée à son 
génie ?””. 

Après cette approche naturelle, il sera bien facile, comme déjà dit, 
de se rabattre sur le BASIC pour concrétiser sur un écran, dans leur sim- 
plicité voulue, les exemples proposés. Il suffira, si ce n’est déjà fait, 
d'apprendre un vocabulaire d’une centaine de mots, articulés sur une 
syntaxe limpide. Leur consonance anglo-saxonne n’est pas gênante et 
apporte du /00k... Il n’y a pas de conjugaison, l'ordinateur se conten- 
tant de déclarations non équivoques du genre MAITRE=0 ou 
ROBOT = 1, et du présent de l'impératif. À la limite, il tolère des condi- 
tionnels aussi évolués que SI FROID ET CIEL GRIS ALORS MOI PAS 
SORTIR. Bien sûr, derrière ces formes reposantes, il y a des significations 
précises : on ne parle pas en BASIC pour ne rien dire, et ceci compense 
en bonne partie cela. Enfin, on y donne cyniquement des ordres puis 
des contrordres ; le dernier est toujours le bon, du genre : MAINTENANT 
A=À + 1. 

Mais les pensées les plus subtiles, les théorèmes les plus inattendus sont 
toujours à la dernière marche d’un escalier d’évidences. 

Un savant génial utilise bien, une fois par siècle, ce qui ressemble à 
un ascenseur pour ses contemporains, mais cela ne s’en avère pas moins, 
après coup, toujours une simple marche. 

L'ordinateur, avec ses jeux d'instructions, en détient un stock complet 
à la disposition des programmeurs auxquels il ne reste plus qu’à bâtir 
de superbes escalators. 

Quel adulte responsable n’a pas ainsi accepté à une époque de sa vie, 
pour communiquer avec ses enfants, de transformer et de simplifier pro- 


3. Antoine de Rivarol, Discours sur l'universalité de la langue française. 
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visoirement son vocabulaire, à seule fin de faire ensemble un bout de 
chemin ? 

Qui ne s’est alors aperçu que ce sous- -langage dépouillé contenait en 
fait l'essentiel et permettait ensuite l’élévation progressive des mots, des 
échanges, et de l'intelligence qu'ils sécrètent ? 

Pour en terminer avec ces questions de langage, comment distinguer 
par leur forme, un programme d’Intelligence Artificielle et un programme 
informatique ‘‘classique’’ ? 

En effet, sans entrer dans les détails techniques, rien ne ressemble plus 
à un programme en BASIC qu'un autre programme en BASIC : il ya 
des lignes numérotées, quelques remarques en clair, et des litanies d’ins- 
tructions. Pourtant, en y regardant de plus près, on relèvera dans les pro- 
grammes de ce livre, tout comme dans les explications et commentaires 
qui en sont donnés, un certain nombre de particularités qui reflètent le 
caractère du sujet exposé. 

D'abord, l'intervention à une fréquence inhabituelle de variables { 
affublées de noms évocateurs, OBS, ESS, ATT et autre PIL qui symboli- 
sent et représentent, non pas des gwantités, mais des propositions quali- 
tatives vraies ou fausses telles que : IL Y A UN OBSTACLE. Certaines 
de ces variables, reflétant par exemple le rang d’une position ou l’état 
d’un Do de l'écran, seront dotées d’un ou deux indices ou #rg4- 
ments ÿ et passeront ainsi au statut philosophique supérieur de prédicat 
dont nous verrons, à l’aide des exemples, la simple signification. 

Enfin, dans certains programmes, ces prédicats pourront prendre des 
valeurs quelconques et non plus seulement les deux valeurs vrai ou faux. 
Ils deviennent alors de véritables fonctions logiques, celles que nous uti- 
lisons inconsciemment pour débroussailler nos problèmes quotidiens. Leur 
puissance de représentation et de manipulation est considérable. En fait, 
sans variables indicées, le BASIC serait pratiquement inapte à toute pro- 
grammation d’I.A. 

Ensuite, un usage intensif du générateur de nombres pseudo-aléatoires. 
En clair, on joue souvent à la roulette. C’est que, dans la vie des robots, 
les données, les obstacles, l’environnement doivent être peu ou prou dis- 
tribués au hasard, sinon à quoi leur servirait-il d’être devenus intelligents ? 

Il y a un autre motif moins évident mais essentiel à ces habitudes de 
casino. Le monde réel présente souvent des données incomplètes, floues, 
voire contradictoires. André Gide note qu’il entre dans toutes les actions 


4. Variables numériques ou variables chaînes de caractères. 

5. Indices ou arguments uniquement numériques permis par le BASIC, mais qui peuvent très 
bien correspondre aussi à des faits qualitatifs ; l’autre avantage décisif des indices réside dans leur 
pouvoir de mémorisation du déroulement d’un scénario et, en conséquence, dans leur pouvoir 
d'expression de la notion d'apprentissage. 
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humaines plus de hasard que de décision et Paul Valéry en donne le sai- 
sissant contrepoint : que de choses il faut ignorer pour agir... En quel- 
que sorte, on ne sait pas tout ce qu’il faudrait savoir pour bien faire, 
mais si l’on savait tout l’on ne ferait pas. 

Heureusement, cette nécessité de fonder partiellement nos actes sur 
le néant — le hasard n'est-il pas le néant qui se manifeste ? — s’avère 
souvent aussi efficace que la part raisonnée du comportement, à condi- 
tion de rester dans certaines limites. Car il est fréquent que le problème 
à résoudre pardonne une erreur : ou bien la solution trouvée est accepta- 
ble, même si elle n’est pas la meilleure, ou bien l’on peut reprendre ses 
billes et recommencer la partie. 

En outre, ces aléas donnent curieusement une marge de manœuvre, 
des degrés supplémentaires de liberté, et confèrent au déroulement de 
l’action son caractère varié, indéterministe, inattendu, qui en fait le sel 
et constitue aussi, non seulement la raison d’être, mais la substance de 
l'apprentissage. 

Enfin, on butera à chaque détour sur les pointes d’aiguillage des déci- 
sions conditionnelles, les fameux IF THEN (si alors), car les robots, comme 
chacun sait, y regardent à deux fois avant de faire un pas. 

En fait, d’autres particularités apparaîtront, dont les motifs ne seront 
clairement saisissables qu’à l'appui d'exemples précis. 

Voilà pour la forme. En ce qui concerne le fond on a en général affaire, 
dans les programmes ordinaires de simulation de mouvements, à des pro- 
jectiles, à des boules de billard, à des astéroïdes, au mieux à des fusées, 
c’est-à-dire à des corps mobiles plus ou moins ##ertes qui, une fois lan- 
cés, obéissent aveuglément à leur destin déterministe. La multiplicité des 
trajectoires provient uniquement de la variété possible infinie des ordres 
de lancement : direction et vitesse initiales. 

Rien de tel ici. On verra peu à peu émerger de la brume inertielle, 
d’abord quelques lueurs, puis un faisceau de plus en plus riche de compor- 
tements cohérents, une espèce d'autonomie, une recherche progressive 
du meilleur moyen d'atteindre le but assigné et de déjouer les contrain- 
tes et les obstacles. 

Au fil des premiers programmes, le progectile deviendra #iss1le, puis 
robot. La solitude du programmeur se peuplera d’une étrange compa- 
gnie car il y aura bientôt sur l'écran, non plus guelque chose qui circule, 
mais quelqu'un qui veut aller quelque part. 


Il 


PROUVER LE MOUVEMENT EN MARCHANT 


“L'homme est ainsi bâti : quand un sujet 
l’enflamme, l'impossibilité disparaît à son âme.” 
J. DE LA FONTAINE. 
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Quelques mots pour développer les raisons du choix du thème des simu- 
lations de mouvements dans un ouvrage présentant des programmes d’ini- 
tiation à l’I.A., raisons déjà effleurées dans l’Introduction. 

Chacun possède au moins un domaine dans lequel il excelle et à tra- 
vers lequel il sait s'exprimer pleinement. Ce peut être aussi bien la pêche 
au lancer, le calcul mental, le bridge, le tir à la carabine, le jeu vidéo 
de Pac-Man, les paris hippiques, l'expression verbale, l’aéromodélisme, 
l’art de séduire, les problèmes de géométrie, le motocross, la danse, la 
menuiserie, la cuisine, l’astronomie, la musique... 

Ces domaines privilégiés possèdent trois caractéristiques communes. 

D'abord, ils peuvent concerner un éventail très large d'activités et, fait 
essentiel, aussi bien celles réputées manuelles ou matérielles que celles 
noblement cataloguées comme intellectuelles ou spirituelles. Il est aisé 
de constater qu’en fait cette tentative de mise en deux bocaux séparés 
est dénuée de sens. 

Ensuite, les intéressés peuvent y atteindre effectivement à un haut degré 
de perfection de la connaissance, de l'intelligence des situations, hors de 
portée du premier venu, l'amateur dépassant alors parfois le profession- 
nel. Ils constituent en quelque sorte l’exaltation, dans un compartiment 
précis, des facultés individuelles, et donc la preuve que celles-ci existent 
à l’état potentiel, fleurissant dès que certaines conditions sont remplies. 

Enfin, ils deviennent toujours l’objet d’une véritable passion. 

Dans son livre Jai//issement de l'esprit \, Seymour Papert lie cette ger- 
mination aux ‘‘matériaux’” dont l'individu a disposé, en particulier dans 
son enfance, et avec lesquels il a eu l’occasion de jouer et de penser, de 
se construire un monde de connaissances progressivement enrichies, détail- 
lées, structurées, approfondies, ef aimées. Pour Papert par exemple, les 
jeux d’engrenages l'avaient fasciné ; il les avait manipulés et fait tourner 
dans tous les sens, sous toutes les formes, du moteur à ressort au diffé- 
rentiel de voiture, et avait fini par s'identifier corporellement à eux, tour- 
nant avec eux, et les assimilant ainsi par l’intérieur, digérant leurs 
propriétés les plus subtiles, transformant les engrenages en substance de 
Seymour Papert, en esprit de Seymour Papert. 

Qui n’a pas eu ses jeux d’engrenages, parfois très variés, à divers à âges 
de la vie ? Qui ne désire les retrouver un jour sur son chemin, s’y réincar- 
ner et s'envoler vers un sommet de son rêve, libéré des inhibitions et des 
faux obstacles ? 

Dans un domaine comme l'informatique d’amateur, où la program- 
mation apparaît parfois comme une activité abstraite réservée à quelques 
originaux, un jeu d’engrenages est le bienvenu. 


1. Éditions Flammarion. 
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Il me semble que la simulation des mouvements constitue l’un des 
plus excellents. Un mouvement à toujours quelque chose d’étrange ; il 
est l’image de la vie, avec ses inflexions, ses hésitations, ses retours, ses 
palpitations, ses fulgurances. 

On à facilement envie de créer des mouvements, de les exécuter, de 
s’y identifier comme le joueur de pétanque qui accompagne la boule de 
ses dynamiques contorsions, comme l’enfant qui navigue le long du ruis- 
seau aux côtés de son bateau de papier, qui clignote des yeux devant les 
feux du carrefour ou qui tourbillonne avec sa toupie. 

Ainsi, pour aborder le sphinx de l'informatique par la petite porte natu- 
relle de la programmation sur micro-ordinateur, la simulation des mou- 
vements m'était déjà apparue comme un banc d'essai idéal?. Cela 
permet, non seulement d’obtenir sur l’écran des effets concrets intéres- 
sants, parfois spectaculaires, et de recréer certains aspects du monde réel, 
mais aussi d'exploiter à fond toutes les ressources d’un micro-ordinateur : 
manipulation de nombres et de chaînes de caractères, calcul logique, gra- 
phisme, couleurs, sons, intervention au clavier ou à l’aide des manettes 
de jeu pendant le déroulement de l’action. 

De même, au moment de proposer les exemples plus spéciaux de ce 
livre, c’est encore vers les mouvements, pour les mêmes raisons que pré- 
cédemment, qu’il me paraît opportun de tourner les regards. 

En outre, nous verrons que ce thème se prête particulièrement bien 
à la mise en vedette de nombreux critères reconnus actuellement comme 
spécifiques des programmes d’Intelligence Artificielle, par exemple les 
notions d’heuristique, d'apprentissage, de variabilité de l’ environnement, 
d'anticipation et de fonction d'évaluation d’une situation, de program- 
mation déclarative, d’indéterminisme, de données conflictuelles, de droit 
à l'échec, etc. Cela, certes, dans les limites vraies d’un micro-ordinateur, 
de sa mémoire et de son langage, mais hors des préjugés et des idées reçues 
relatives à son inaptitude congénitale à ce genre d’exercice, surtout si les 
idées et procédés correspondants sont, avant toute démonstration, expo- 
sés en clair. 

En somme, l’Intelligence Artificielle manquant de naturel, l’intelli- 
gence naturelle y obvie en recourant à des artifices. 

Mais le mieux à cet égard n'est-il pas, pour prouver le mouvement, 
de marcher ? 


2. Dynamique-Cinématique, Méthode pour la programmation des jeux, Éditions Sybex. 
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II 


QUELQUES IDÉES REÇUES NATURELLES 
SUR L'INTELLIGENCE ARTIFICIELLE 


‘‘La pensée est une activité à laquelle je me livre 
rarement.” 
A. EINSTEIN. 
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L'I.A. a déjà droit de cité au stade industriel dans quelques domai- 
nes, et fait l’objet de recherches importantes avec des spécialistes de haut 
niveau, des ordinateurs puissants d'architecture nouvelle et des langages 
également nouveaux particulièrement évolués. 

Ces trois critères, savants chercheurs, super-ordinateurs, hyperlangages 
constituent certes des facteurs éminemment favorables au développement 
des applications futures, de plus en plus complexes, mais ne constituent 
nullement des conditions sine qua non à la réalisation de programmes 
d'initiation à l'I.A. 

Aucun ordinateur, aucun langage, aucun programmeur ne saurait être 
a priori tenu à l'écart d’une activité de programmation quelle qu’elle soit. 

Le livre récent de Mike James !, et d’autres, fournissent des exemples 
intéressants sur micro-ordinateur dans des domaines divers, mais qu’on 
retrouve souvent d’un ouvrage à l’autre en raison de leur réputation 
démonstrative. 

Des considérations peu familières au débutant interviennent parfois 
en I. A. Elles ne sont pas toujours d’ordre théorique ni spécialement dif- 
ficiles, et c’est souvent leur vocabulaire et le caractère abstrait de leur expo- 
sition qui peuvent dérouter. Elles seront abordées le moment venu sur 
les exemples précis proposés et sous forme aussi communicable que pos- 
sible. Car c’est bien la communicabilité qui fait le plus défaut dans le 
cercle encore fermé des chercheurs en L.A., longtemps confinés dans leurs 
nécessaires et délicates relations internes. Mais cela, même en France, évo- 
lue rapidement. Des revues sérieuses publient des articles ‘‘grand public” 
assez clairs ou des numéros spéciaux ? qui permettent de faire le point 
et d’enfourcher la noble monture. 

Le beau livre d’Alain Bonnet, l’Intelligence Artificielle, promesses et 
réalités ?, ouvre les portes à un haut niveau mais dans un langage sim- 
ple où les définitions sont clairement données. 

La revue internationale Artificial Intelligence permet aussi, bien sûr, 
de se tenir au courant, mais la lecture est plus difficile. 

L'essentiel est de ne pas avoir à s’abreuver à des sources qui, pour expli- 
quer du grec, se croiraient obligées de le traduire en hébreu. 

‘‘Puissé-je ne me servir que des mots qui servent aux Halles à 
Paris! 4” et puis encore : “‘Il faut bien citer ce qu’on ne comprend point 
dans la langue qu’on entend le moins °.”” 

À partir de l’étincelle initiale, la suite est plus simple car l’enthou- 


. Introduction à l'Intelligence Artificielle sur micro-ordinateur, Éditions Eyrolles. 
. Sciences & Avenir, n° spécial 53, 1985. La Recherche, n° spécial 170, 1985. 

. InterÉditions. 

. Montaigne, Essais. 

. Voltaire, Micromégas. 
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siasme est presque inévitable; on peut sans difficulté insurmontable 
apprendre ce qu’est, dans son essence, l’I.A., puis commencer immé- 
diatement à participer à son bouillonnement général. On peut le faire 
aujourd’hui en amateur mais ce sera moins vrai demain pour une raison 
très simple : l’I. A. en est encore, au bon sens du terme, au stade du brr- 
codage. 

Il existe beaucoup d'outils plus ou moins au point, conçus par des arti- 
sans quelquefois géniaux et dont le savoir-faire, acquis sur le terrain, 
s'affirme chaque jour. La plupart de ces outils (langages, méthodes, machi- 
nes, principes quelquefois, découvertes rarement) font avancer l’entre- 
prise, même si quelques-uns d’entre eux apparaissent, provisoirement 
peut-être, destinés à demeurer dans les stands du Concours Lépine. 

De temps à autre, une idée fulgurante jaillit et donne une arme nou- 
velle pour investir la forteresse et s'attaquer plus efficacement à la cham- 
bre des coffres. 

Quant aux produits, on peut en voir une kyrielle de prototypes pres- 
que toujours habilement présentés, mais les objets à dénicher sont encore 
mal définis. Certains sont parfaitement consommables et auront plus tard 
leur place au glorieux musée de l’'I.A. 

Dans ce Grand-Pressigny de la pensée, il est possible de rester specta- 
teur critique, corrosif ou bienveillant. Mais il est humainement plus naturel 
d’être fasciné, d’entrer dans l'arène comme un enfant et, saisissant le 
premier outil à portée, de se frapper sur les doigts, de mieux entrevoir 
l'ampleur de l’entreprise, ses vertigineux pièges et la difficulté de pour- 
suivre une construction dont l'architecte n’a pas fourni les plans. 

Il n’est pas nécessaire d’être intégré dans des équipes de haut niveau 
pour participer à l’aventure, voire pour apporter sa pierre. 

Les communautés, certes, stimulent et bénéficient de moyens inacces- 
sibles à l'amateur isolé, mais tendent aussi à unifier les opinions, à nive- 
ler les imaginations débordantes indispensables dans ce genre d’exercice, 
à élever des murs d'écoles. Il en fut ainsi pour les espèces vivantes, au 
cours des âges ; le croisement des idées, comme celui des individus d’une 
grande population, tend à redistribuer les mêmes gènes et à stabiliser 
l'espèce. C'est aux Galapagos et non sur les grands continents inter- 
connectés que Darwin put avoir la révélation de l’Évolution, d’un îlot 
à l’autre, là où les ‘‘monstres’’ avaient tranquillement pu échapper à la 
normalisation. 

C’est aussi dans le cocon d’un morne bureau de brevets qu’un origi- 
nal échafauda la théorie de la relativité, totalement débranché des cou- 


6. Peut-être en sera-t-il toujours ainsi car l’utilisation d’une simple boussole suppose que l’on 
sache où l’on veuille aller. 
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rants neuroniques extérieurs, mais parfaitement au fait de ce qu'il fallait 
trouver. 

En préliminaire aux exploits de nos robots, essayons, parce qu’il est 
normal de connaître un peu le terrain sur lequel on va s’aventurer, d’appro- 
cher l'I.A. par quelques-uns de ses aspects concrets tels qu’ils sont actuel- 
lement reconnus par la communauté des chercheurs. 

Au départ de toute exploration, il y a l'inconnu, la jungle, le vrac. 
Voici, sous cette forme, une liste non exhaustive d’applications ou de 
pistes de recherche de l’'I.A., les unes presque parvenues au stade de 
l’exploitation courante, d’autres au niveau des laboratoires, d’autres encore 
à l’état de spéculations embryonnaires ou, pire, déjà jetées dans la pou- 
belle des échecs, quitte à émerger à nouveau plus tard sous des formes 
nouvelles : 

a. L'aide au diagnostic d'une situation, par exemple dans le domaine 
médical ou géologique. 


b. L'aide à la décision de traitement d'une situation, prolongement logi- 
que de la précédente démarche. 


a et b constituent actuellement le prometteur univers des systèmes 
experts dont les premières recherches, dans les années 60, sous l’impul- 
sion parfois mal accueillie d’ Américains comme Buchanan ou Feigen- 
baum, débouchent maintenant sur des applications presque 
quotidiennes dans de multiples domaines. Il est nécessaire et suffi- 
sant (c’est peu de le dire), pour bâtir un système expert, de soutirer 
les connaissances des meilleurs experts humains du domaine consi- 
déré?, de les transférer avec un mode de représentation adéquat dans 
la base de connaissances du système, et de réaliser le #oteur d'infé- 
rence, c'est-à-dire le programme de manipulations mentales (induc- 
tions, déductions,.…) capable de conduire à l’objectif visé. Doté d’un 
tel système, l'utilisateur, gui doit être lui-même compétent dans le 
domaine concerné, introduit les données particulières au cas à traiter 
dans la base de faits (par exemple les symptômes qu'il détecte sur un 
malade) et, après un dialogue plus ou moins long avec la machine au 
cours duquel des faits ou des explications complémentaires sont éven- 
tuellement demandés ou fournis, il obtient un diagnostic ou une pré- 
somption de diagnostic et une proposition de traitement. 


c. L’E.L.A.O., enseignement intelligent assisté par ordinateur, qui n’a 
que peu de ressemblance avec les programmes actuellement commer- 
cialisés sous le sigle E.A.O. 


7. Il s'agit de connaissances proprement dites, mais aussi de règles pour les utiliser, des règles 
sur les règles (métaconnaissances), etc. 
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d. Les jeux de l'esprit : pour les dames, le backgammon et les échecs, 
c’est déjà la réussite ; pour le poker et le bridge, c’est un banc d’essai 
prometteur dont la réussite à terme ne peut faire aucun doute. 


e. La reconnaissance des formes, pour choisir, saisir, transporter et pla- 
cer un objet. 


f. La compréhension des images. 


£- La reconnaissance de l'écriture, dans l’acception sémantique du terme ; 
c’est réalisé pour l'écriture d'imprimerie, c’est probablement réalisa 
ble pour les écritures cursives manuelles. 


b. La reconnaissance de la parole, malgré la variété des timbres, des into- 
nations. et des significations. 


1. La fraduction automatique, prolongement des deux applications pré- 
cédentes, qui a fait l’objet dans un passé récent d’échecs retentissants 
et qui repart sur de nouvelles bases 8. La commande des robots en est 
un cas particulier. 


. La résolution de questions mathématiques difficiles : recherche d’inté- 
q # . . 
grales, démonstration inédite de théorèmes, … 


k. D'une manière générale, toutes les activités assistées bar ordinateur 
(XAO). 


/. La robotique. 


C'est ce dernier domaine qui ouvre les perspectives les plus fascinan- 
tes, car il est le seul à conduire l’Intelligence Artificielle au bout de sa 
logique : l'Action Artificielle, et à montrer d’une façon éclatante l’unité 
indissociable de la pensée et du comportement physique. 

D'ailleurs, la commande des robots constitue l’un des secteurs les plus 
difficiles de l’I. A. ; elle constitue pourtant l’exact équivalent de la tâche 
de nos nerfs moteurs, ceux qui règlent les gestes de ce qu’on appelle avec 
légèreté le ‘‘travail manuel”” ; encore une expression qui dénote la mé- 
connaissance totale d’une simple réalité : nos actes sont les seules mani- 
festations et les seules preuves de notre intelligence, ils soft notre 
intelligence. 

Il faut bien entendu considérer l’acte au sens large : faire, mais aussi 
décider, commander, coordonner une action, écrire, peindre, émettre une 
opinion, conseiller, extérioriser d’une manière quelconque une contri- 
bution à la réalisation d’un dessein. 


8. Cf. Jacques Pitrat, Textes, Ordinateurs et Compréhension, Éditions Eyrolles. 
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C'est aussi ce domaine, sous le modeste égide d’une trilogie amateur- 
micro-ordinateur-BASIC, et dans le secteur le plus simple, celui de la 
simulation des déplacements, que le présent livre se propose d’effleurer. 

Le lecteur aura peut-être remarqué que la liste d'applications ci-dessus 
possède une double propriété curieuse : incomplétude et surabondance. 
Il faudra dans quelque temps en rajouter, mais il faudra aussi en enle- 
ver; nous y reviendrons. 

Essayons maintenant de dégager, à partir de cette liste, ce qu'il est 
convenu d’ appeler l’Intelligence Artificielle. 

Pour qu’une application puisse prétendre actuellement ressortir au 
domaine de l’I.A., elle doit posséder, à des degrés significatifs, plusieurs 
des propriétés énumérées plus loin et naturellement liées aux deux ter- 
mes de la définition : #ntelligence, artificielle. 

Nous commencerons par le second, d’un abord apparemment plus 
facile. 


Artificielle 


Les systèmes concernés sont faits par des hommes et pour des hommes 
et font donc appel dans leur conception — en amont — et dans leur uti- 
lisation — en aval — à l'intelligence humaine, et cela à un niveau sou- 
vent élevé car les applications correspondantes sont toujours complexes 
et plus ou moins nouvelles. 

C'est au stade de leur fonctionnement propre qu'ils prennent leur carac- 
tère artificiel : ce sont en effet des machines ou des ensembles de machi- 
nes qui opèrent, grâce à leur constitution matérielle d'une part et aux 
connaissances au sens large (savoir, règles) qui leur ont été injectées d’autre 
part. 


Intelligence 


Ce terme est, en l’état actuel et probablement pour longtemps, indé- 
finissable de manière satisfaisante et complète, tout bonnement parce 
que nous ne savons pas comment est constitué ni comment fonctionne 
ce que nous nous plaisons à considérer — avec une parfaite suffisance — 
comme notre plus beau privilège. 

Jean d’Alembert disait que la nature de l’homme est un mystère impé- 
nétrable à l’homme quand il n’est éclairé que par la raison seule. Doté 
d'intelligence certes, mais tout juste assez pour s’en servir et sûrement 
pas autant qu'il en faudrait pour la définir. 

Mieux vaudrait s’adresser au Constructeur, mais, probablement trop 
occupé pour s’arrêter à ces fariboles, il n’a pas jugé nécessaire de fournir 
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les plans de ses créations. Peut-être le modèle définitif n’est-il même pas 
au point si l’on en juge par certaines performances. 

La pensée sur la pensée est un phénomène d’autoréférence et nous 
savons, depuis que Kurt Güdel a lancé, avec son célèbre théorème d’incom- 
plétude, un coup de pied dans la fourmilière des philosophes, que nous 
sommes là dans une impasse, l’impasse de notre propre nature. 

Douglas Hofstadter nous éblouit et nous donne le vertige de cette invrai- 
semblable situation : ‘C’est de cet équilibre entre la connaissance et 
l'ignorance de soi que naît le libre arbitre °.”’ 

Quoi qu’il en soit, nous essaierons au long du livre de nous esquisser 
une silhouette de la belle, silhouette plus ou moins valable, mais tou- 
jours fondée sur les exemples concrets que nous rencontrerons. 

Pour l'instant, nous pouvons simplement recenser certaines des carac- 
téristiques exigées ou admises, explicitement ou non, pour qu’une appli- 
cation ait droit de cité au fabuleux royaume de l’I.A., sous réserve encore 
qu’elle les possède à un degré suffisant : 


a. Le problème à résoudre, la situation à maîtriser sont en général 
complexes et comportent des données et des règles nombreuses, 
d'ordre plus qualitatif que quantitatif ; 


b. De ce fait, le programme est amené à manipuler des symboles parti- 
culiers de représentation du domaine concerné; 


c. Il y a un but final précis; 
d. Il existe un environnement d'obstacles et de difficultés ; 


e. Cet environnement varie d’une opération à l’autre ou même au cours 
d’une opération ; 

f. Il peut manquer des données, il peut y en avoir de surabondantes, 
voire de conflictuelles ; 


g. Il peut y avoir plusieurs façons de s’y prendre, l’essentiel étant d’attein- 
dre le but en un temps acceptable ; en corollaire, il y a aussi risque 
d'échec ; 

h. S'il y a échec, on peut recommencer et, éventuellement, réussir ; 


1. L'on recourt à des recettes plus qu’à des méthodes : l’algorithme cède 


9. Godel, Escher, Bach, les Brins d'une guirlande éternelle, InterÉditions. D. Hofstadter à tenu 
à écrire en français l’avant-propos de son livre ‘‘.… car, de toutes les langues cibles, il n’y en a qu’une 
que j'aime suffisamment pour vouloir, pouvoir, voire Zevoir en faire la langue de mon propre avant- 


propos’’. 


— 29 — 


la place à l’heuristique ; le ‘‘truc’” est, dans l’échelle des valeurs, sou- 
vent au-dessus de la raison pure, l’heuristique n’est pas un algorithme 
au fabais; 


Il y a, pour une opération donnée, apprentissage au fur et à mesure 
des essais d'exécution successifs, réussis ou ratés ; 


Le système peut être capable d’évaluer l'efficacité de son action et 
de changer de comportement ; 


Il peut y avoir collaboration entre l'intelligence propre du système 
et celle de l'opérateur humain (dimension sociale de l'intelligence) ; 
ce point essentiel constitue une découverte assez récente ; 


Lorsqu'il s'agit de robotique, les robots ont des organes sensoriels 
pour appréhender l’environnement et des organes moteurs (effecteurs) 
matérialisant leur autonomie ; leur ‘‘intelligence’” réside habituelle- 
ment dans un ensemble séparé de traitement : ils n’ont pas, comme 
les hommes, un ordinateur individuel portatif. 


L'idéal, pour la pratique de l’I.A., est de disposer d’un ordinateur 
et d’un langage (LISP, PROLOG,...) permettant : 


La représentation interne de connaissances et de règles de natu- 
res très diverses ; 

L'introduction de ces connaissances en vrac, indépendamment 
de leur utilisation future (programmation déclarative) et en lan- 
gage aussi peu informatique que possible ; 

L'adjonction ou la modification de connaissances sans refonte 
totale du programme ; 

Un dialogue agréable entre le système et l'opérateur; 

La manipulation tous azimuts des connaissances et des données 
particulières du problème à résoudre : déductions, inductions, 
en un mot inférences. 


La liste n’est pas close, mais suffira à notre bonheur de néophytes. 


Notons, comme pour la liste d'applications des pages 26 et 27, l’impres- 
sion curieuse ressentie à sa lecture : son caractère hétéroclite, à la fois 


incomplet et surabondant ; il y a de la mode et de l’éphémère là-dedans. 
Nous essaierons d’en trouver les raisons en déroulant les exemples : 


les robots nous diront peut-être pourquoi la lueur d'intelligence du ven- 
dredi prend souvent, le dimanche, une bien terne apparence. 


Pour terminer ce chapitre, nous donnerons la définition de l’I.A. pro- 


posée par Alain Bonnet dans son livre déjà cité : 
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‘C’est la discipline visant à comprendre la nature de l'intelligence en 
construisant des programmes d'ordinateur imitant l'intelligence 
humaine.” 


Cette définition est belle, car désintéressée. Dans la traduction commer- 
ciale de cette I. A. idéale, il est nécessaire d’inverser les termes, c’est-à- 
dire les buts et les moyens : construire et vendre des programmes d’ordi- 
nateur imitant l'intelligence, en essayant à cette fin de comprendre vaille 
que vaille la nature de l’intelligence humaine. 

Mais cela n’est pas une critique, car les applications pratiques ont tou- 
jours été les meilleurs témoins et les moteurs les plus puissants des gran- 
des aventures de l’esprit ; la pensée est un besoin physique comme un 
autre. 
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IV 


QUE LA LUMIÈRE SOIT 


‘‘Ressemblons-leur : c’est le moyen d’avoir la paix.’ 
J. GREEN. 
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Ce chapitre est consacré à l'émergence progressive du comportement 
‘‘intelligent’’ d’un robot mobile, à partir de la passivité inerte d’un 
projectile. La métamorphose passera par une belle chrysalide aux talents 
intermédiaires : un missile autoguidé. 

Cette évolution cérébrale, au cours de laquelle l’objet mobile acquerra 
un standing ascendant et méritera des noms de plus en plus flatteurs, 
s'opérera en sept étapes, à travers sept exemples simples permettant d'en 
saisir avec précision les stades. 

Chaque exemple, repéré de E1 à E7, sera d’abord exposé en langage 
naturel, puis interprété en BASIC. Ils sont facilement transposables sur 
d’autres micro-ordinateurs. Les conditions de cette interprétation seront 
chaque fois soigneusement précisées — notamment les moyens sensoriels 
dont le robot est censé disposer — afin qu’il y ait véritablement un 
isomorphisme | aussi serré que possible entre le scénario réel et le 
système correspondant de simulation sur l'ordinateur, avec ses instructions 
et son écran. 

Il est en effet indispensable, pour tirer des conclusions valables du 
spectacle de chaque aventure, de savoir exactement ce qu’on y a fait entrer. 
Nous verrons que cela est souvent facile, mais qu’il y a néanmoins des 
cas où le transfert réalité-ordinateur est plus délicat : le risque principal 
d’erreur ne consiste pas à ozb/ier d’insuffler au robot les facultés qu’on 
entend lui donner, mais au contraire à lui en donner trop, sans se rendre 
compte que certaines opérations de l'ordinateur, la reconnaissance de la 
direction géographique du maître par exemple, impliquent l'existence 
chez le robot, non seulement du sens de la vue (détecter la présence d’un 
objet) mais aussi du sens des angles et de leur estimation. 

Dans certains exemples ultérieurs (E13, E27, E28, E30), cela ira plus 
loin : il faudra que ce sens de la vue comprenne un goniomètre comme 
précédemment et un télémètre pour apprécier les distances. 

Bien entendu, cet isomorphisme se traduit dans l’ordinateur par des 
calculs à partir des coordonnées des divers éléments concernés se traduisant 
eux-mêmes par des positions affichées sur l’écran. 

Mais tout cela s’éclairera facilement sur les exemples, ainsi que bien 
d’autres opérations de représentation de l’univers de nos robots; c’est 
ainsi que nous les doterons de la vue, du toucher, et même de l’ouïe… 
et de l’odorat (E26). 

Il va de soi que sur de vrais robots, il est moins facile d'installer des 


1. Isomorphisme : correspondance entre les éléments de deux structures ; chaque élément de 
l'une donne lieu à une ##ferprétation de chaque élément correspondant de l'autre. Un isomorphisme 
bien choisi permet ainsi de représenter une réalité (de vrais.robots) par un système de symboles 
(l'ordinateur). 
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facultés sensorielles de ce genre. L’odorat en particulier n’a pas encore 
trouvé son palpeur valable — l'équivalent de la caméra pour la vue ou 
du microphone pour l’ouïe —, s'agissant de déceler d’infimes traces en 
suspension dans l’air ambiant. 

Nos simulations sont heureusement dispensées de ces difficultés de 
première grandeur. 
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ÉTAPE El 
L'INERTIE AVEUGLE 


Présentation 


Un projectile est tiré au hasard dans une direction quelconque, sur 
un terrain dégagé, dans l’espoir qu’il atteigne une cible fixe dont la posi- 
tion est également déterminée au hasard avant chaque tir. 

Pour rester dans les limites de l’écran, le projectile rebondit indéfini- 
ment sur les bords comme une boule de billard. Il est donc doté d’un 
sens du toucher qui lui sert également lors du contact avec la cible. Il 
est évidemment nécessaire de simuler ce sens dans le programme se 
matique : c’est le rôle des deux sous-programmes ‘‘effets de bords’” 
‘‘cible atteinte’” 

Ce premier scénario a deux objectifs : indiquer la structure de prin- 
cipe de tous les programmes du livre et, surtout, tirer les conclusions du 
comportement de ce projectile primitif. 

La structure d’un programme de simulation de mouvement pas à pas 
est simple. Elle est décrite avec plus de détails dans le livre Cinématique- 
Dynamique déjà cité au Chapitre II. 

En résumé, elle consiste essentiellement : 


e en une première zone concernant les données de départ 


Fixer et afficher sur l’écran le point de départ du mobile. 


Fixer éventuellement la vitesse et la direction du lancement (si le 
mobile est lancé comme c’est le cas). 


Fixer les données du terrain : dans le présent exemple, s’agissant 
d’un terrain nu, seule la cible est à prendre en considération. 


e en une deuxième zone de génération des mouvements 


Constituer /4 boucle des mouvements élémentaires du mobile, par- 
ue clé du programme. L’instruction principale de cette boucle est 
celle qui donne la nouvelle position à partir de la position précé- 
dente; on ajoute simplement aux coordonnées précédentes les 
composantes de la vitesse. Celle-ci est bien entendu préalablement 
calculée compte tenu de tous les éléments du scénario (position de 
la cible, obstacles, mode de ‘‘raisonnement”’” du mobile, etc.). Dans 
le cas présent, comme il s’agit d’un projectile inerte, il conserve tout 
bonnement sa vitesse de lancement. 
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La boucle des mouvements renvoie par ailleurs aux divers sous- 
programmes susceptibles de jouer un rôle : 
Effets correctifs sur la position ou la vitesse du mobile, par exemple 
les effets de bords si le projectile dépasse les limites de l'écran ; on 
l'y ramène alors et l’on change le signe de la composante de vitesse 
responsable du débordement, simulant ainsi la loi physique d’un 
rebondissement. (Dans les programmes suivants, il y aura ainsi éga- 
lement un effet correctif chaque fois que le mobile touchera un 
obstacle.) 


Effets de sorte, par exemple arrêt du parcours lorsque la cible est 
atteinte, et renvoi à un nouveau tir. 


La boucle des mouvements comporte enfin l’affichage sur l'écran 
de la nouvelle position du mobile et, si désiré, l’effacement de la 
précédente ou l'affichage de sa trace atténuée (teinte pastel) pour 
visualiser agréablement la trajectoire. Cette boucle FOR NEXT doit 
comporter un nombre de mouvements potentiels suffisant pour per- 
mettre le déroulement complet du scénario : 500 dans le présent 
exemple. 


e en une troisième zone de SOUS-Drogrammes 


Élaborer les sous-programmes nécessaires. Dans le présent exemple, 
il y en a deux, l’un pour les effets de bords, l’autre pour vérifier 
à chaque pas si la cible est atteinte ; ces deux sous-programmes uti- 
lisent le sens du toucher dont notre missile a été doté. 


Pour chaque exemple, et en particulier celui-ci, on trouvera le pro- 
gramme démonstratif ainsi que ses commentaires techniques éventuels 
en fin de l’exposé. 

Noter que les remarques incluses dans les programmes proprement dits 
(REM) permettent d’en saisir déjà l’essentiel. 

Quelques effets sonores ou visuels accessoires visent à donner du sel 
à l’action ou ont un rôle didactique : visualisation des piliers du labyrin- 
the touchés, points d’interrogation sur les positions susceptibles d’être 
choisies, etc. 

Venons-en maintenant, après ces quelques considérations techniques, 
aux enseignements de ce premier exemple de comportement d’un objet 
mobile. Il n’est pas difficile d’en constater l’ineptie et l’inefficacité. Bien 
que les multiples rebondissements aux limites de l’écran entretiennent 
les chances de ratissage, la réussite de la mission s’avère incertaine. 

L'on voit, d’après les dimensions de l’écran, qu’il y a un millier de 
positions possibles pour la cible. Le programme permet au projectile, 
comme nous l’avons dit, d'accomplir 500 pas. Dans ces conditions, la 
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probabilité de réussite est de l’ordre de 40 pour 100. Les lecteurs avertis 
en calcul de probabilités pourront l’évaluer exactement *. 

Plus prosaïquement, le programme proposé permet de »esurer cette 
probabilité : c’est le quotient RGR/RG (RGR, nombre de parcours réussis ; 
RG, nombre total des parcours effectués). 

Ce résultat peut paraître curieux, un taux de réussite aussi élevé avec 
un comportement aussi stupide! Et 500 pas, c’est vite fait. Bien 
entendu, cela est lié aux ratissages multiples dus aux rebondissements. 
Dans la réalité d’un terrain illimité, il y aurait une probabilité infinitési- 
male d'atteindre le but et une quasi-certitude que le projectile se perde 
dans l’infinité des horizons possibles. 

Mais peut-être est-il moins évident de remarquer que, dans le cas d’un 
espace limité tel que l'écran, il n’est pas plus idiot de partir au hasard 
que de mal viser : la probabilité de réussite est la même. Seule une visée 
rigoureuse assure la victoire (étape E3 ci-après). Pour le vérifier, il est facile 
de modifier le programme en laissant l'opérateur estimer le cap d’un coup 
d'œil puis l’introduire au clavier à l’aide d’une instruction INPUT ou 
INKEY$. 

On constate ainsi que l’essentiel, dans une telle aventure, est moins 
d'y aller que d'aller : un bon moyen d'améliorer une mauvaise position 
consiste à en changer jusqu’à ce qu’on en trouve éventuellement une 
bonne. 

L'intelligence humaine, donc l'[.A., utilise couramment des lapalis- 
sades de ce genre auxquelles on a donné un nom distingué que nous décou- 
vrirons à l'étape F4. 


Programme 
100 ’ETAPE E1:PROJECTILE INERTE,CIBLE FI 
XE,LANCEMENT AU HASARD 
116 INK 0,22 :INK 1,1 :INK 2,6 :CLS :CLE 
AR_£RG=O E RGR=O “NB” DE PARCOURS: EFFECTUÉ 
S RG ET NB DE PARCOURS REUSSIS RGR 
120 NOMBRES ALEATOIRES VARIES 
130 RANDOMIZE TIME 
140 CLS :H=INT(2XRND) :1IF H=1 THEN PXC=I 


NT(1OXRND+7) :PYC=S ELSE PXC=7 :PYC=INTI( 
1OXRND+7) ’TIRAGE POSITION CIBLE 

150 PXPRO=28 :PYPRO=23 :PPXPRO=PXPRO :PP 
YPRO=PYPRO ?’POS DEP PROJECTILE ET MISE E 
N RESERVE POUR EFFACMT 


2. Attention! La probabilité de réussite n’est pas de 50 pour 100 au bout de 500 pas, même 
si elle est de 0,1 pour 100 (en moyenne) au bout de chaque pas. 
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60 PEN 1 :LOCATE PXPRO,PYPRO :PRINT'#" 

PEN 2 :LOCATE PXC,PYC:PRINT"'o" ‘AFF PRO 

ECTILE ET CIBLE 

70 CAPPRO=INT(360XRND) :VXPRO=SIN(CAPPR 

157.3) : VYPRO== COS (CAPPRO/57.3) ’TIRAGE 

CAP DEP DE O À 359 DEG ET CALC COMP 

ITESSE PROTEET ILE 

60 SOUND 1,200,60,7 :FOR AT=1 TO 2000 

EXT ‘TOP DÉPA 

000 REM BOUCLE DES MOUVEMENTS 

010 FOR M=1 TO 500 

020 PXPRO=PXPRO+UVXPRO :PYPRO=PYPRO+VYPR 
*CALC NOUV POSITION 

030 GOSUB 3000 *EFFETS DE BORDS 

PEN _1_:IF CINT(PXPRO) (40 OR CINT(P 

YPRO)<>25 THEN LOCATE PPXPRO, PPYPRO :PRI 

NT* *SLOCATE PXPRO, PYPRO :PRINT'#" : SOU 

ND 1, 7 : PPXPROZ SPXPRO_ à PPYPROZPY PRO 

ELSE "OU 1 : PXPRO=39 :VXPRO=-A 

BS (UXPRO) : SYPRÈE ABS UT PROT :GOTO 1040” 

1050 GOSUB 4000’CIBLE ATTEINTE 

1060 NEXT M 

1070 REM PARCOURS, RATE 

1080 SOUND 1,800,50,7 :FOR AT=1 TO 1000: 

NEXT AT : LOCÂTE BEXPRO, PPYPRO :PRINT" " 

:RG=RG+1 :GOTO 15 

1090 END 

2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG EFFETS DE BORDS 

3010 IF CINT (PXPRO)>0 THEN 3020 LELSE sou 


rOmmemzZmE Ortyeshe 


Le] 
$Oo 
O 


D 1,53,10,7 :PXPRO=1 :VXPRO=-V 
3020 IF CINT (PXPRO) (41 THEN 3030 ELSE SO 
UND 1,53,10,7 :PXPRO=40 :VXPRO=-VXPRO 
3030 ÎF ÉINT(PYPRO)>0 THEN 3040 ELSE SOU 
ND 15 53, 10, 7 :PYPRO=1 :VYPRO=-VYPRO :RET 
3040 IF CINTIPYPRO)<26 THEN RETURN ELSE 
SOUND_ 1,53, 10, 7 : PYPRO=25 :VYPRO=-VYPRO 


4000 REM SSPROG CIBLE ATTEINTE 

4010 IF CINT(PXPRO)<)PXC THEN RETURN ELS 
E IF CINT(PYPRO)C>PYC THEN RETURN 

4020 FOR FOIS=1 TO 4 :SOUND 1,100,10,7 : 
FOR AT=1 TO 100:NEXT :NEXT :FÜR Af=1 TO 
SOO:NEXT :RG=RG+1 :RGR=RGR+1 :GOTO 140 


Commentaires techniques 


e Tirage au hasard des positions et des vitesses : l’ appel au générateur 
de nombres aléatoires se fait suivant des modalités qui diffèrent d’un 
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ordinateur à l’autre. Sur l’Amstrad, cela s'effectue grâce à l’instruc- 
tion RANDOMIZE. 


Identification des variables : on les désigne par des lettres ou des groupes 
de lettres évocateurs et rationnels pour faciliter la programmation, par 
exemple PX et PY pour la position, VX et VY pour la vitesse, PPX 
et PPY pour la position précédente, etc. 
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ÉTAPE E2 
DES OBSTACLES INUTILES 


Présentation 


Il s’agit du même projectile inerte et aveugle. Mais on a introduit sur 
le terrain des obstacles, placés au hasard, sur lesquels le projectile rebon- 
dit dans une direction quelconque. Il est donc doté, comme en El, du 
sens du toucher. 

On peut constater que, si la présence des obstacles n’améliore pas les 
performances du projectile, elle ne les détériore pas non plus complè- 
tement. 

Le hasard, total au départ, est assez peu sensible à de nouveaux fac- 
teurs de hasard. 

Le néant a ceci de fort qu'il ne saurait être diminué. 

Constatons donc, là encore, que la cible n’est pas totalement à l'abri, 
du seul fait que le projectile, aussi stupide soit-il, rôde dans les parages 
et ne se laisse arrêter ni par les bords, ni par les obstacles. 

C'est la seule miette d'intelligence que l’on puisse lui reconnaître, mais 
c'est une grosse miette… 


Programme 


100 ’ETAPE E2:PROJECTILE INERTE,CIBLE FI 
KE,LANCEMENT AU HASARD, OBSTACLES, REBONDS 
AU HASARD 

110 INK O,22:INK 1,1:INK 2,6:CLS:CLEAR 


Nana PXPI(30),PYP1(30) TABLEAUX OBST 
us REM SERIES VARIABLES DE NB ALEATOIRE 


140 RANDOMIZE TIME 

150 CLS:PXC=INT(20XRND+10) :PYC=INT (SXRND 
+10): PXPRO=PXC+INT (11XRND-S) :PYPRO=PYC+I 
NT(11XRND-5):1IF PYPRO=PYC THEN PYPRO=PYC 
+1’POS DEP PROJECTILE 

160 PPXPRO=PXPRO: PPYPRO=PYPRO’MISE EN RE 
POUR _EFFT 

170 CLS:PEN 1:LOCATE PXPRO,PYPRO:PRINT " 
X":PEN 2:LOCATE PXC,PYC: PRINT “O"’AFF PR 
OJ ET CIBLE 


o 
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180 FOR N=i TO 30 :PXPI(N)=PX 

D-5) :PYPI(N)=PYC+INT(L1XRND-S) :IF PXPI 
{N) =PXPRO THEN IF PYPI(N)= 

EEE : GOTO 210 


200 PEN 1 :LOCATE PXPI(N),PYPIIN) :PRINT 

"=" °TIRAGE ET AFF 20 OBSTACLES 
210 MNEXT N 
220 CAPPRO=INT (360XRND) : VXPRO= SIN (CAPPRO 
757.3) :VYPRO=-COS (CAPPRO/57.3)°TIRAGE CA 
P DÉPART DE O À 359 DEG ET CALC COMP EU? 
ESSE PROJECTILE 
230 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
XT’ TOP DÉPART 

1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=1i TO 500 

1020 PXPRO=PPXPRO+VXPRO: PYPRO=PPYPRO+VYP 
RO’CALC NOUV POSITION 

1030 GOSUB 3000’EFFETS DE BORDS 

1040 GOSUB 4000” OBSTACLE 

1050 IF OBS=1 THEN 1020 

60 PEN 1:1F CINT(PXPRO)<>40 OR CINT(PY 

PRO <5E5 THEN LOCATE PPXPRO, PPYPRO: PRINT 
" n:LOCATE PXPRO, PYPRO:PRINT"#":SOUND L 
20:17: PPXPRO= PXÉRO:PPYPRO=PYPRO ELSE 
UND 1,5 7:PXPRO=39: RBROS ABS UN BRO 
sUYPRÉ= FABSTUYPROS à GOTO 1060'AFF ET MISE 


1670 Rédeus 9000’CIBLE ATTEINTE 

1080 NEXT M 

1090 END 

2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG EFFETS DE BORDS 

3010 IF CINT(PXPRO)>0 THEN 3020 ELSE SOU 


ND 1,53,10,7:PXPRO=1 : VXPRO=-VXPRO 

3020 ° IF CINT(PXPRO)<41 THEN 3030 ELSE SO 

UND 1,53,10,7:PXPRO=40:VXPRO=-VXPRO 

3030 ?F ÉINT(PYPRO)>0 THEN 3040 XÉPSE SOU 

ND 1,53,10, 7: PYPRO=1 : VYPRO=-VYPRO: RETURN 

3040’ IF CINT(IPYPRO)<26 THEN RETURN ELSE 

SOUND 1,53,10,7:PYPRO=25: VYPRO=-VYPRO: RE 

4000 REM SSPROG OBSTACL 

4010 OBS=0 ?ANNUL OBST PRECDT 

4020 IF CINT(PXPRO)<PXC-5 THEN RETURN EL 

SE IE CINT (EXPRO) PXC+5 THEN RETURN EL 

SE IF CINT(PYPRO)<PYC-5 THEN RETURN ELSE 
IF CINT(PYPRO)>PYC+5S THEN RETURN 


4030 FOR N=i TO 30 :1IF CINT(PXPRO)<>PXPI 
(N) THEN 4060 ELSE IF nr ae 
N) THEN 4060 ELSE SOUND 80,10,7 :PEN 2 
: LOCATE PXPRO,PYPRO: PRINT ni FOR AT=1 
TG 9O:NEXT :PÊN 1 :LOCATE PXPRO,PYPRO:P 


LE 340 = 


RINT "=" 
4040 SI1=INT(ISXRND-1) :1F S1<>0 THEN S2=1 
NT(3XRND-1) ELSE S2=INT (2XRND)-0.5 ?’TIRA 
GE_COMPOSANTES NOUV VITESSE 

4050 UVXPRO=SGN(S1) :UYPRO=SGN(S2) :OBS=1 


: N=30 
4060 NEXT N 
4070 RETURN 


23000 REM SSPROG CIBLE ATTEINTE 
3010 IF CINT(PXPRO)<>PXC THEN RETURN ELS 
E IF CINT(PYPRO)<2>PYC THEN RETOSN 
5020 For FOIS=i TO 4:SOUND 100 
R_AT=1 TO 100:NEXT PhDEAT FbIS 


PEOR’ AŸE 
10 500; NEXT AT:GOTO 


Commentaires techniques 


e Les 30 obstacles sont introduits au moyen de variables indicées : les 
coordonnées PXPI et PYPI des piliers, tirées au hasard, sont indicées 
de 0 à 29, ce qui permet de les mémoriser individuellement et de savoir 
par la suite si le projectile touche l’un deux. 

C'est à cette fin que le sous-programme obstacle passe systémati- 
quement en revue les 30 positions de piliers pour voir si l’une d’elles 
coïncide avec celle du projectile. Dès qu'il a détecté un pilier, les recher- 
ches sont interrompues. 

Cette façon de procéder est facile à saisir, mais elle est longue à l’exé- 
cution comme on peut le constater, car 1l faut faire 30 boucles de test 
après chaque pas du projectile. Nous utiliserons à partir de E9 une autre 
méthode plus puissante faisant appel à la notion de prédicat, mieux 
en harmonie avec les méthodes générales de l'I.A., pour déterminer 
instantanément s'il y a un obstacle ou non à tel ou tel endroit. 


e Noter, dans la boucle des mouvements, que PX et PY sont calculés 
à partir de la position précédente mémorisée PPX et PPY, et non à 
partir de PX et PY ; cela est indispensable car, en cas de contact avec 
un pilier, une autre position doit être trouvée et recalculée à partir de 
la position de départ. 


e On fait intervenir dans le sous-programme obstacle la variable OBS, 
qui prend la valeur 1 s'il y a un obstacle et 0 si la place est libre. Il 
s'agit là d'une proposition logique vraie ou fausse, courante en pro- 
grammation. Elle est aussitôt utilisée comme une sorte de drapeau de 
signalement dans la boucle des mouvements, dès le retour du sous- 
programme : si OBS = 0, l’on passe; si OBS = 1, l’on recalcule la 
nouvelle position visée à l'aide de la nouvelle vitesse fournie par le sous- 
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programme et l’on recommence le cérémonial. Il est nécessaire de rame- 
ner OBS à 0 à chaque entrée dans le sous-programme pour éviter les 
obstacles imaginaires. 


Le programme ne renvoie au sous-programme que si le projectile se 
trouve effectivement dans la zone où tous les obstacles ont été volon- 
tairement concentrés, cela accélère l'exécution. 
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ÉTAPE E3 
UN PREMIER CLIN D'ŒIL 


Présentation 


Une première lueur mentale jaillit, unique et définitive à l'instant du 
lancement, puis c’est à nouveau le naufrage dans la passivité pour le reste 
du parcours. En effet, on a cette fois affaire à un projectile awtolancé sur 
cible fixe et terrain dégagé. 

La faculté d’autolancement consiste pour le projectile à percevoir avant 
le départ la cible et sa direction géographique, puis à foncer dans cette 
direction et à s’y tenir sans autre vérification ultérieure. L'impression quel- 
quefois zigzagante de la course est due à la faible définition des posi- 
tions d'écran (arrondis d’affichage). 

La simulation sur l'ordinateur de ce sens goniométrique de la vue se 
réalise par le calcul trigonométrique (tangente, puis cosinus et sinus) des 
composantes de la vitesse du projectile, calcul basé sur les positions res- 
pectives de la cible et du projectile au moment du lancement. 

Cette évaluation n’est donc faite qu’une seule fois et l’on peut imagi- 
ner que, dans la réalité, l’‘‘œil’” du projectile resterait sur la base de lan- 
cement pour les prochains tirs, économie oblige. 

On peut admirer à l’exécution la fiabilité, c’est-à-dire l’infaillibilité 
absolue du système, grâce à la précision des calculs (6 décimales). Cela 
suppose bien sûr pour notre projectile un sens de la vue et des angles 
très performant, dont la réalisation concrète serait probablement assez 
difficile. 

Notons que les calculs conservent comme précédemment leur forma- 
lisme mathématique, y compris une précaution contre la division par zéro, 
dont chacun de nous se soucie pourtant comme d’une guigne dans la 
vie courante *.… 


3. La division par zéro correspond pourtant dans la vie courante à une savoureuse absurdité : 
partager la succession d’un défunt qui n'aurait aucun héritier, ce qui est d'autant plus dommage 
que la part de chacun est alors infinie ; l'État, avide, se précipite sur le pactole et celui-ci reprend 
aussitôt une dimension terrestre qui n’a plus rien de miraculeux. 
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Programme 


100 ’ETAPE E3:PROJECTILE INERTE,CIBLE FI 

XE, TERRAIN NU, AUTO-LANCEMENT 

110 INK O,22:INK 1,1:INK 2,6:CLS:CLEAR 

120 “NOMBRES ALEATOIRES VARIES 

130 RANDOMIZE TIME 

140 CLS:H=INT(Z2XRND):IF H=1 THEN PXC=INT 

(10XRND+7) :PYC=5 ELSE PXC=7:PYC=INT(1OXR 

ND+7)’TIRAGE POSITION CIBLE 

150 PXPRO=28: PYPRO=23: PPXPRO=PXPRO: PPYPR 

Ü=PYPRO'POS DEP PROJECTILE ET MISE EN RE 

SERVE POUR EFFT 

160 PEN 1:LOCATE PXPRO, PYPRO:PRINT"#":PE 
ATE PXC,PYC:PRINT"'Oo"’AFF PROJECTI 

LE ÉT CIBLE 


170 REM CALC INCLINAISON IN DE LA DIR DE 
LA VITESSE DE DEPART DU PROJECTILE 

180 NUME=ABS (PYPRO-PYC) : DENO=ABS (PXPRO- 
PXC) :1IF DENO<O.1 THEN DENO=O. 1 

170 IN=NUME / DENO 

200 REM CALC COMPOSANTES VITESSE 

210 AN=ATN(IN) : VXPRO=COS (AN) XSGN (PXC-PX 
PRO) _: VYPRO=SIN(AN) XSGN (PYC-PYPRO) 

220 SOUND 1,200,80,7:FOR AT=1 TO 2OO00:NE 
XT°’ TOP DEPART 

1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=1 TO 500 

1020 PXPRO=PXPRO+VXPRO: PYPRO=PYPRO+VYPRO 

CALC NOUV POSITION 

030 PEN 1:LOCATE PPXPRO,PPYPRO: PRINT" " 

: LOCATE PXPRO, PYPRO:PRINT"X": SOUND 1,30 
» ZE PPXPRO=PXPRO: PPYPRÜ=PYPRO? AFF ET'MI8 
(el 


RES 
GOSUB 3000’CIBLE ATTEINTE 
NEXT M 


1060 END 
2000 REM ZONE DES SOUS-PROGRAMMES 
3000 REM SSPROG CIBLE ATTEINTE 
3010 IF CINT(PXPRO)<2>PXC THEN RETURN ELS 
E IF CINT(PYPRO)<>PYC THEN RETURN 

20 FOR FOIS=1 TO 4:SOUND 1,100,10,7:F0 
R_AT=1 TO 100:NEXT:NEXT:FOR ÀT=1" TO’ 500: 
NEXT:GOTO 140 


Commentaires techniques 


Dans le sous-programme cible atteinte, il faut prendre la valeur arrondie 
des coordonnées du projectile pour en tester l'identité avec les coordon- 
nées de la cible, car les composantes de la vitesse sont, comme nous l'avons 
vu, calculées avec plusieurs décimales. 
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ÉTAPE Ed 
LES HEURISTIQUES 


Présentation 


I s'agit d’un sss1le autoguidé sur cible fixe, doté comme le projec- 
ule de E3 d’un sens de la vue directionnel. Mais son comportement mental 
est cette fois radicalement différent. 

Peu doué pour les calculs, il préfère avancer d’une manière plus approxi- 
mative vers la cible mais en y regardant tout au long du parcours, faisant 
en quelque sorte le point après chacun de ses pas. Théoriquement, nous 
avons vu que cela n’est pas nécessaire si l’on vise parfaitement la cible 
au départ, mais cela ne coûte rien et l’on ne sait jamais. 

Ici intervient la notion d’heuristique, la pensée pratique qui prime 
sur les considérations de raison pure. En l'occurrence, on va faire le point 
surabondamment et s'appuyer sur cette redondance pour assurer un suc- 
cès que le caractère sommaire de la démarche ci-après risquerait de 
compromettre. 

Cette démarche, qui s'apparente au système D, dédaigne le concept 
pourtant imparable consistant à se diriger droit sur la cible car il prend 
en compte les éléments suivants : 


e ilest fatiguant de mesurer exactement la direction et de tenir un même 
cap tout au long du parcours ; 


e de toute façon, ce n’est pas possible de manière rigoureuse puisque, 
à chaque pas, le missile n’a le droit de se placer que sur l’une des huit 
positions (cases de l'écran caractérisées par un numéro de ligne et un 
numéro de colonne) voisines de celle qu'il occupe ; il ne peut donc 
faire que des pas horizontaux, verticaux ou en diagonale. 


Comme le montre la figure ci-après, il peut, au mieux, effectuer le 
parcours À du programme précédent, E3, qui n’est que pseudo-rectiligne 
car il serpente autour de la droite idéale du fait des arrondis d'affichage. 
Il est inutile dans ces conditions de passer du temps à calculer la direc- 
uon à un millième de degré près, ce qui retarde l’action et la victoire. 

Enfin, argument décisif et inattendu, le nombre de pas à effectuer avec 
le parcours pseudo-rectiligne À est exactement le même que si l’on choi- 
sit plus simplement un parcours brisé (parcours B ou parcours C) facile- 
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ment déterminable sans calcul compliqué comme nous allons le voir ‘. 

Une heuristique est ainsi une manière empirique de penser pour résou- 
dre un problème, pour faire face à une situation, par opposition à l’a/go- 
rithme de l'étape E3 qui menait mathématiquement à la solution ÿ. 

L’heuristique peut avoir l'inconvénient de ne pas toujours aboutir (ce 
n’est pas le cas ici) et de ne pas toujours satisfaire un esprit rigoureux, 
mais là n’est pas le but. Cela est compensé par plusieurs avantages. 

Le premier est celui, en général, de la simplicité, le seul principe direc- 
teur, souvent insconscient, étant celui de la moindre fatigue intellectuelle 
possible, même si dans certains cas il y a en rançon un travail matériel 
un peu plus long ou un peu plus pénible. C'est en quelque sorte la somme 
de ces deux catégories d’efforts qu’une bonne heuristique cherche à 
minimiser. 

Le second avantage est un temps de réflexion moins long entre deux 
phases d’action successives. Par exemple, l’heuristique 1 du parcours B 
permet d’atteindre la cible plus vite que les calculs du parcours À de E3, 
et l’heuristique 2 du parcours C, particulièrement simple dans sa 
conception, permet d’y arriver encore plus rapidement. Rappelons que, 
dans les trois cas, le nombre de pas est équivalent, c’est la cadence qui 
est différente. 

Nous présenterons vers la fin du livre, en E33, un banc de comparai- 
son des heuristiques d’une épreuve donnée, tenant compte de cette 
considération essentielle. 


C : parcours avec heuristique 2 


A : parcours E3 


projectile 


B: parcours 
avec heuristique 1 





4. Une formulation générale de cette constatation et de ses conséquences est proposée en 
Annexe II, après avoir pris un éclairage plus précis en E13. 
5. Cf. P. Beaufils et W. Luther, A/gorithmes, Éditions Sybex. 
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Voyons maintenant de façon précise ce que sont les deux heuristiques 
imaginées pour notre missile, étant bien entendu qu'il en existe beau- 
coup d’autres possibles, que le lecteur pourra inventer. C’est en ce domaine 
des heuristiques que l'imagination révèle la place qu’elle tient dans l’intel- 
ligence. ! 

Réglons d’abord une question de vocabulaire utile pour la suite. Il s’agit 
pour le projectile de se déplacer en zertain libre de manière à atteindre 
la cible dans les meilleures conditions: Nous conviendrons dans ce cas 
que nous avons affaire à une hewristique de navigation, par opposition 
aux heuristiques de dégagement que les robots utiliseront plus loin pour 
contourner les obstacles placés sur leur chemin. 

Les heuristiques de navigation de ce livre seront repérées par un chif- 
fre de 1 à 6 et les heuristiques de dégägement par une lettre de A à I. 
Toutes ces heuristiques figurent dans un tableau récapitulatif en fin 
d'ouvrage (Annexe I). 

Cela dit, la première heuristique repérée 1 consiste, en chaque point 
du parcours, à apprécier l’inclinaison de la direction missile-cible par rap- 
port à l'horizontale (direction ouest-est-de l’écran), ce qui est simulé sur 
l'ordinateur par le calcul du rapport IN = distance verticale missile- 
cible/distance horizontale missile-cible. 

Par exemple, sur la figure, ce rapport vaut 5/17 = 0,29. 

Suivant la valeur du rapport IN, la décision du missile est la suivante : 


e si IN est inférieur à 0,5 (c’est-à-dire si le missile se trouve à droite de 
la frontière IN = 0,5 tracée sur la figure), le missile fait un pas hori- 
zontalement ; 


e si IN est supérieur à 2 (c’est-à-dire si le missile se trouve au-dessous 
de la frontière IN = 2), il fait un pas verticalement; 


si IN est compris dans la fourchette de 0,5 à 2 (c’est-à-dire si le missile 
se trouve dans le secteur intermédiaire), il fait un pas en diagonale. 


Le programme informatique correspondant, aussi bien que les opéra- 
tions mentales humaines qu’il faudrait effectuer, sont d'exécution beau- 
coup plus rapide que ceux de l’étape E3 ; un coup d’œil, une estimation 
de l’angle (une légère erreur n’a aucun effet dommageable sur le résul- 
tat final !), et une décision simple : vers la gauche, vers le haut, en biais. 

Quant à l’heuristique de navigation 2, c’est le modèle idéal en matière 
de simplicité et de rapidité. Il n'y a rien à calculer. Si le missile et la 
cible sont sur une même ligne, un pas horizontal ; si le missile et la cible 
sont sur une même colonne, un pas vertical; dans tous les autres cas, 
un pas en biais. 
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Moins formelles que les algorithmes, les heuristiques possèdent par- 
fois l’étrange beauté de l’indéfinissable à côté de l’ascétique splendeur 
de certains cheminements mathématiques. 

Les trajets B et C correspondant aux heuristiques de navigation 1 et 
2 sont représentés sur la figure, ainsi que le trajet À de l'étape E3. Ils 
sont, comme on le voit, très différents. 

Le trajet B est d’abord horizontal jusqu’à la frontière IN = 0,5 puis 
il suit cette frontière en serpentant au plus près. 

Le trajet C est apparemment moins direct mais comporte cependant 
le même nombre de pas que À et B; il présente en outre une allure p/us 
décidée qui apparaît nettement à l’exécution en raison de la cadence éle- 
vée des mouvements. Il suffit en effet au missile, dans la ‘‘réalité””, de 
voir à chaque pas si sa visée de la cible est parallèle ou non à l’un des 
bords du terrain, en imaginant par exemple deux mires lointaines situées 
sur le prolongement de chacun des bords nord et ouest. 

C’est ce que fait le programme présenté ci-après, qui exécute à titre 
de comparaison successivement la même mission (mêmes positions de 
départ) avec les heuristiques 1 puis 2. 

On dit en Sologne que le poireau est l’asperge du pauvre. Outre que 
ce dicton tendancieux est faux, car le poireau a ses propres vertus, il n’est 
absolument pas transposable à l’heuristique vis-à-vis de l'algorithme. 
L'heuristique n’est nullement un algorithme au rabais, à moins de 
considérer l’homme comme inférieur à la machine. 

On pourrait à la rigueur prétendre que l'heuristique est un algorithme 
de paresseux futé, le second qualificatif étant largement suffisant au pardon 
du premier, et le tout constituant le glorieux label que beaucoup reven- 
diquent. 

À ce stade F4, il ne s'agit donc plus tout à fait d’un projectile, mais 
sûrement pas encore d’un robot car les critères énumérés au Chapitre HI 
sont encore loin d’être significativement réunis. Seuls y sont présents les 
critères c, g, 1 et 7, les critères 7 et »7 étant les plus caractéristiques de IA. 


Programme 


100 ’ETAPE E4:MISSILE AUTO-GUIDE,CIBLE F 
1XE,TERRAIN NÜ,IER PARCOURS AVEC’ HEURIST 
IQUË DE NAVIGATION (1),PUIS 2EME PARCOUR 
& AVEC HEURISTIQUE DE NAVIGATION (2) 

110 INK 0,22:INK 1,1:INK 2,6:CLS:CLEAR 
120 SYMBOL AFTER 32:SYMBOL 33,8FO0,&EO,&F 
O0,&B8,RIC,RF, Ré, &4 

130 RG=0’ INITIALISATION RANG RG DU PARCO 
URS 
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O NOMBRES ALEATOIRES VARIES 

O RANDOMIZE TIME 

0 CLS 4 1 :LOCATE ié6,5 :PRINT "HEUR 
O H=INT(2XRND):1IF H=i THEN PXC=INT(20+# 
D+8):PYC=6 ELSE PXC=8:PYC=INT(1SXRND+S 


O PXMI=28:PYMI=23:PPXMI=PXMI:PPYMI=PYM 
POS DEP MISSILE ET MISE EN RÉSERVE 
90 LOCATE PXMI,PYMI:PRINT CHRS (33) : PEN 
‘LOCATE PXC,PYC:PRINT "o"’AFF MISSILE E 
200 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
XT’TOP DEPART 
210 RG=RG+1 

1000 REM BOUCLE DES MOUVEMENTS 

1010 REM 1ER PARCOURS:HEUR NAV (1)3;2EME 
PARCOURS: HEUR NAU (2) 

1020 FOR M=1 TO 500 

1030 IF RG=2 THEN 1060 ELSE IF PXMI<)PXC 
THEN NUME=ABS(PYMI-PYC) : DENO=ABS (PXMI- 
PXC) :IN=NUME/DENO ELSE 100 ’CALC INCLI 
NAISON IN DE LA DIR DE LA VITESSE 

1040 IF IN<O.5S THEN VXMI=SGN(PXC-PXMI) 
VYMI=O :GOTO 1080 

1050 IF IN)2 THEN VXMI=O :VYMI=SGN(PYC-P 
YMI) :GOTO 1080 

1060 VXMI=SGN(PXC-PXMI) :UYMI=SGN(PYC-PY 
MI) :GOT0 1080 

1070 VXMI=O :VYMI=SGN(PYC-PYMI) 

1080 PXMI=PXMI+UVXMI: PYMI=PYMI+VYMI’ CALC 
NOUV POS 

1090 PEN 1:LOCATE PPXMI,PPYMI:PRINT" "il 
OCATE PXMI,PYMI:PRINT CARS (33) :SOUND 1,2 
OU 1,2: PPXME=PXNI : PPYMISPYNI AFF ET MISÉ 
1100 GOSUB 3000’CIBLE ATTEINTE 

1110 FOR AT=1 TO 20:NEXT:NEXT M 

1120 END 
2000 REM ZONE DES SOUS-PROGRAMMES 
3000 REM SSPROG CIBLE ATTEINTE 
3010 IF PXMI<>PXC THEN RETURN ELSE IF PY 
MI<DPYC THEN RETURN 
3020 FOR FOIS={ TO 4:SOUND 1,100,10,7:F0 
R AT=1 TO 100:NEXT:NEXT:FOR ÀT=1 TO’ 500: 
NEXT:IF RG=2 THEN 110 
3030 LOCATE 29,5:PRINT"2":GOTO 180 
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Commentaires techniques 


Contrairement à E3 où le projectile calculait sa vitesse une fois pour 
toutes au départ, c’est-à-dire en amont de la boucle des mouvements, 
la vitesse est ici redéterminée à chaque pas, dans la boucle même. 


Les composantes VX et VY de la vitesse ne peuvent avoir que des valeurs 
très simples : 

VX = -1et VY 0 pour les pas horizontaux ; 

VX = Oet VY = -1 pour les pas verticaux; 

VX — let VY = -1 pour les pas en diagonale. 
Pour chaque épreuve, le programme réalise deux parcours : le premier 


(RG = 1) avec l’heuristique de navigation 1, le second (RG = 2) avec 
l'heuristique 2. La différence de complexité des opérations est évidente. 


Il 


Dans le sous-programme cible atteinte, il n’est plus nécessaire d’arrondir 
la position du missile, puisque ses coordonnées sont toujours des nom- 
bres entiers. 
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ÉTAPE ES 
UN ENVIRONNEMENT VARIABLE 


Présentation 


Il s’agit du même missile autoguidé que précédemment, mais le degré 
de progression par rapport à Ed est de taille : la cible est mobile, suivant 
un mouvement rectiligne uniforme de direction quelconque tirée au hasard 
avant le départ. 

Cette fois, la nécessité d’un guidage permanent à chaque position du 
missile et de la cible ne se discute pas. 

On est dans le cas d’un environnement variable en cours d'exécution 
de la mission (critère e du Chapitre II). Le monde du missile, bien que 
toujours réduit à deux éléments, les limites du terrain et la cible, devient 
changeant. 

Aveugle et inerte en El et E2, ouvrant un œil en E3, économe de ses 
efforts intellectuels en E4, il va lui falloir maintenant regarder en perma- 
nence le seul objet de son univers, la cible mouvante. 

Curieusement, bien qu’une complication importante vienne ainsi 
d’apparaître, le procédé mental utilisé en E4 reste parfaitement valable ; 
aucun organe sensoriel supplémentaire, aucune intelligence supérieure 
n’est requise pour surmonter cette nouvelle épreuve. Le missile pourra 
tout aussi bien utiliser l’heuristique de navigation 1 ou 2 de E4, voire 
l'algorithme de E3. 

La seule condition d’un succès à tous coups est étrangère à l'I.A. : il 
faut que le missile vole au moins aussi vite que la cible. C’est le cas dans 
le programme présenté. 

Si la cible va un peu plus vite (ce qui est facile à réaliser en multi- 
pliant les deux composantes de sa vitesse par 1,1 ou 1,2), le succès n’est 
pas garanti. Si la cible va nettement plus vite, elle échappe systémati- 
quement à la poursuite. 

En somme, la puissance physique est une composante de l” intelligence. 
Pour confirmer ce point de vue, nous verrons en E27 qu’un surcroît d’intel- 
ligence du missile peut, en terrain fermé, surmonter ce handicap : c’est 
alors l’intelligence qui devient une composante de la puissance physi- 
que, ce qui montre d’une manière éclatante l’inanité des descriptions 
dichotomiques de ces deux manifestations de la vie. 

C’est l’heuristique 2 qui a été choisie pour le programme démonstra- 
üf ci-après, mais ce choix est arbitraire. Le lecteur pourra facilement faire 


PER EE 


la comparaison avec l’heuristique 1 en modifiant les lignes correspon- 
dantes. 

Il est intéressant de constater, à ce stade de réflexion, qu’ n'y a aucun 
rapport entre les performances d'une heuristique et sa complexité, à moins 
que l’on ne donne justement un nom évocateur et peut-être mesurable 
à ce rapport : /4 quantité d'intelligence contenue dans l'heuristique. 

Il y a peut-être là une piste pour définir et mesurer l'intelligence arti- 
ficielle, comme on mesure depuis quelques décennies la quantité d’infor- 
mation contenue dans un message. Or, un programme est un message. 

L'intelligence d’une heuristique serait alors mesurée par le rapport per- 
formance du programme/quantité d’information du programme. La 
notion de performance reste à préciser. Elle me semble liée à la guantité 
d'information sécrétée par le programme en question. Dans cette accep- 
tion, l'intelligence d’une heuristique est un rapport sans dimension ana- 
logue à un coefficient d'amplification. 

Plus un programme est court, plus il est intelligent à performance égale. 
Les prochains couples d'exemples E10-E11 ou E28-E29 nous fourniront 
de la matière complémentaire en ce domaine, de façon très concrète. 

Je noterai, pour finir, que la relation de définition de la quantité d’I.A. 
amorcée ci-avant n’est peut-être pas linéaire. Les sensations sont en général 
logarithmiques vis-à-vis de leurs causes (loi de Weber-Fechner). Il pour- 
rait en être de même pour la sensation d'intelligence que nous procure 
une heuristique. Nous y reviendrons plus loin à la lumière d’autres 
exemples. 

En tout état de cause, nous poursuivrons l’investissement de la forte- 
resse esprit, en amateurs bien sûr. 


Programme 
100 ’ETAPE ES:MISSILE AUTO-GUIDE,CIBL 
gbil e, TERRAIN NU,HEURISTIQUE DE NAVIGATI 

(23; COURBE DITE "DU CHIEN" 

Co INK O,22:INK 1,1:INK 2,6:INK 3,23:CL 
S:CLEAR 
120 SYMBOL AFTER 32 :SYMBOL 33,&FO,R&EO,& 
FO,RBS,&1C, &F , Ré, k4 
36 "NÜMBRÈS ALEÂTOIRES VARIES 
140 RANDOMIZE TIME 
150 CLS:H=INT(Z2#RND):IF H=1 THEN PXC=INT 
(1OXRND+3):PYC=3 ELSE PXC=3:PYC=INT (16XR 
ND+a) ’ TIRAGE POSITION CTBLE 
160 PPXC=PXC :PPYC= 
170 PXMI=39: PYMI= ENT ISOXRND+3) : PPXMI= PXM 
LEPPYMI= PYMI’POS DEP MISSILE ET MISE EN 


180 PEN 1:LOCATE PXMI,PYMI:PRINT CHR$(33 
):PEN 2:LOCATE PXC,PYC:PRINT "Oo"’AFF MIS 
SILÉ ÉT CIBLE 

190 VXC=INT(Z3XRND)-1 :IF VXC=0 THEN VYC= 
1 ELSE UVYC=INT(3#RND-1) ’TIRAGE COMP VIT 
ESSE CIBLE 

200 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
XT’TOP DEPART 

1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M= 1 TO 500 

1020 REM CIBLE 

1030 PXC=PXC+UXC :PYC=PYC+UYC ’CALC NOUV 


POS 
1040 GOSUB 3000’ EFFETS DE BORDS 
1050 PEN 2 :IF PXC<>40 OR PYC()25 THEN L 
OCATE PPXC,PPYC :PRINT " ":LOCATE PXC,PY 
C :PRINT'"'oŸ :SOUND 1,100,5,7 :PPXC=PXE : 
PPYC=PYC ELSÉ SOUND 1,53,10,7 :PXC=39 :V 
XC=-ABS(UVXC) :VYC=-ABS(VYC) :GOTO 1050 ? 
AFF CIBLE ET MISE EN RES 
1060 GOSUR 4000’CIBLE ATTEINTE 
1070 REM MISSILE:HEURIST NAV (2) 
1080 VXMI=SGN (PXC-PXMI) : VYMI=SGN(PYC-PYM 


1) 

1090 PXMI=PPXMI+VXMI: PYMI=PPYMI+VYMI’' CAL 

C NOUV POS 

1100 PEN 3:LOCATE PPXMI,PPYMI:PRINT CHRS$ 
(33) :PEN L:LOCATE PXMI,PYMI:PRINT CHRS (3 
: SOUND 1,30,1,7:PPXMI=PXMI : PPYMI=PYMI”? 

F ET MISÉ EN RES 

10 GOSUB 4000'CIBLE ATTEINTE 

20 FOR AT=1 TO SO:NEXT:NEXT M 

30 END 

00 REM 20NE DES SOUS-PROGRAMMES 

00 REM SSPROG EFFETS DE BORDS CIBLE 

10 IF PXC >O THEN 3020 ELSE SOUND 1,53 

0,7 :PXC=1 :VXC=-VXxC 

Ô IF PXC{ 41 THEN 3030 ELSE SOUND 1,5 

0,7 :PXC=40 :UXC=-UVXC 

O'IF PYC)0 THEN 3040 ELSE SOUND 1,53, 
10,7 :PYC=1 :VYC=-VYC : RETURN 

3040 IF PYC<26 THEN RETURN ELSE SOUND 1, 

53,10,7 :PYC=25 :VYC=-VYC : RETURN 

4000 REM SSPROG CIBLE ATTEINTE 

4010 IF PXMIC)PXC THEN RETURN ELSE IF PY 

MIC)PYC THEN RETURN 

4020 FOR FOIS=1 TO 4:SOUND 1,27,5,7:FOR 

AT=1 TO 100:NEXT:NEXT:FOR AT=1 TO’ SOO0:NE 

XT:GOTO 110 


OO QONE EME DU) 
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ON 
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Commentaires techniques 


La vitesse de la cible, uniforme tout au cours de la poursuite, est défi- 
nie en amont de la boucle des mouvements. Ses deux composantes 
valent 1, 0 ou -— 1 afin d’engendrer des mouvements de directions 
variées dont chaque pas franchisse une case d’écran. 


La boucle des mouvements est commune à la cible et au missile. 


Il y a, comme précédemment, deux sous-programmes, l’un pour les 
effets de bords, l’autre pour surveiller l'impact du missile sur la cible. 
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ÉTAPE EG 
UNE HEURISTIQUE DE SURVIE 


Présentation 


Nous revenons au missile autoguidé de E4 avec sa cible fixe, mais une 
autre complication surgit : le terrain se hérisse de 31 obstacles (des piliers) 
qui en font un véritable labyrinthe. 

Il faut préciser que le missile est, comme précédemment, doté de la 
vue pour apprécier la direction de la cible, mais qu’il ne voit pas les piliers ; 
il n’en détecte la présence qu’en les touchant. 

On peut supposer par exemple qu’il fait nuit et que la cible est lumi- 
neuse, ou bien qu’il s’agit d’un labyrinthe dont les piliers sont transpa- 
rents, ou tout autre décor possédant le même isomorphisme sensoriel, 
à savoir : détection directionnelle de la cible, détection par contact des 
piliers. 

L’heuristique, c’est-à-dire le fil de pensée pratique, adoptée dans le 
présent exemple, se compose de deux heuristiques distinctes : 


+ l’heuristique de navigation 1 déjà examinée, valable en terrain nu et 
consistant, en l’absence d’obstacle, à se rapprocher plus ou moins de 
la cible ; 


° une heuristique de dégagement repérée À qui permet de contourner 
les piliers rencontrés, de neutraliser en quelque sorte ces intrus. 


Il faut bien voir que l’opportunité d’une telle décomposition n’est ni 
naturelle, ni évidente. En effet, pourquoi naviguer comme s’il n°y avait 
pas de piliers puis, au moment où l’on arrive dessus, se décider à réagir, 
alors qu'il serait peut-être plus payant de les éviter préventivement en 
faisant un détour ? 

Niels Bohr, dans sa géniale simplicité, a proposé une réponse : il est 
délicat de faire des prévisions, surtout pour l’avenir…. 

Cette boutade nous conduit tout de même à préciser la règle du jeu, 
pierre d’ achoppement permanente de la robotique : le missile i ignore au 
départ la position des piliers et, même pour les parcours suivants, il n’en 
conserve pas la mémoire. Nous verrons qu’il n’en sera pas toujours ainsi, 
mais il faudra alors le dire. 

Ainsi équipé, le missile fait jouer à plein le principe de la fatigue mini- 
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male : ‘Si je me rapproche mine de rien de la cible, cela‘va dans le bon 
sens, et si un pilier se met en travers de ma route je fais semblant d’aller 
ailleurs puis, mine de rien, je me rapproche de la cible..….”” Cela admis, 
le problème sera réglé lorsqu'on aura choisi la tactique de contourne- 
ment des piliers. 

Le principal est de se dégager coûte que coûte et il s’agit en fait de 
survivre pour continuer. Si le missile ne se dégage pas, la superbe heuris- 
tique de navigation sombrera dans l’inutile car il n’y aura plus de navi- 
gation. 

Si l’on compare la mission du missile à une guerre, on peut dire que 
le but en est défini par le chef de l’État, que l’heuristique de navigation 
est l'affaire du général et que l'heuristique de dégagement repose sur 
les épaules du simple troufion (ce mot existe heureusement dans le dic- 
uonnaire car il illustre parfaitement la progression des rôles). 

Quelle est la plus noble des deux heuristiques ? Vous aurez cent réponses 
de cent personnes. 

Si la noblesse consiste à mépriser les détails subalternes, c’est le géné- 
ral et son heuristique de navigation qui dominent largement. L'idée phi- 
losophique de base est, dans ce cas, qu’on ne peut atteindre un objet 
avant de s’en être d’abord rapproché. 

Si la noblesse consiste à vouloir remplir la mission, gloire aux solcats 
et aux heuristiques de dégagement ! L'idée philosophique de base est alors 
du même degré de subtilité que la précédente : pour aller quelque part, 
il faut pouvoir bouger. 

La mère de famille aura des opinions différentes suivant que son fils 
est adulte ou nourrisson et, dans ce dernier Cas, Suivant la carrière qu’elle 
ambitionne pour lui : général ou caporal, jamais soldat. 

D'un point de vue bassement pratique, contentons-nous d'observer 
que, sans heuristique de dégagement, la partie est perdue d'avance alors 
qu'elle peut se passer d’'heuristique de navigation comme nous l'avons 
vu en E2. 

Admettons cependant qu’en plus de nombreux soldats, il faille quel- 
ques colonels. 

Revenons à nos piliers. L'heuristique de dégagement A choisie consiste, 
lorsque le missile touche un pilier, à se placer dans la case nord-est conti- 
guë à celle occupée précédemment ; le missile se dégage donc systémati- 
quement par le nord-est. 

On constate deux choses avec cette méthode : 


e Elle est d’un déterminisme absolu. Associée à une heuristique de navi- 


gation donnée (heuristique 1 en l'occurrence), elle mène le missile par 
un itinéraire unique. 


ef = 


s Elle ne réussit pas toujours le dégagement. En effet, si un autre pilier 
se trouve par hasard à la position convoitée, le missile est définitive- 
ment bloqué. 


Nous n'avons choisi cette heuristique À qu’à titre de contre-exemple. 


Un humain ne tomberait jamais dans une telle chausse-trappe et chan- 
gerait vite d’heuristique après s'être cogné la tête une ou deux fois. 


Programme 
100 ’ETAPE Eé:MISSILE AUTO-GUIDE,CIBLE F 
IXE,31 OBSTACLES,HEURISTIQUE DE NAVIGATI 
ON (1), HEURISTIQUE 


DE PÉCABENERS (A),3 P 
110 AS O,16: INK 1,1:INK 2,6:INK 3,21:CL 


S:CLE 
120 DIM PXPI(30),PYP1(30)’LISTE DES COOR 
DONNEES DES 30 PILIERS 

130 SYMBOL AFTER 32:SYMBOL 33,&FO0,REO,RF 
O,&BE,&RIC,RF, Ré, Rd 

140 "NOMBRES ALÉATOIRES VARIES 

150 RANDOMIZE TIME 

160 RG=1’RANG DU PARCOURS 

170 CLS:H=INT(2XRND):IF H=1 THEN PXC=INT 
(25XRND+5) :PYC=6 ELSE PXC=6:PYC=INT(12%XR 
ND+5)’TIRAGE POSITION CIBLE 

180 PXMI=36:PYMI=21 POSITION DEPART MISI 


A RCE RES MERRSE EN RES PO 
200 PEN 1:LOCATE PXMI,PYMI:PRINT CHR$(33 
): PEN 2Z:LOCATE PXC,PYC:PRINT "o'"’AFF MIS 
SILE ET CIBLE 

210 IF RG)>1 THEN 280 


220 FOR N=O TO 30:PXPI(N)=INT((33-PXC)XR 
ND) +PXC-1:PYPI(N)=INT((21-PYC) /(36-PXC) X 
(PXPI(N)-PXC) )+INT((5SXRND-2) X(PXPI{(N) -PX 


C)/8)+PYC+1 

230 IF PYPI(N)>PYC-2 THEN 250 

240 PYPI(N)=PYC-1:G0OTO 270 

250 IF PYPI(N)<>PYC THEN IF PYPI(N)<22 T 
HEN 270 ELSE PYPI(N)=21:G0OT0O 270 

260 IF PXPI(IN)<>PXC THEN 270 ELSE PYPII(N 


270 PEN 1:LOCATE PXPI(N),PYPI(N):PRINT"= 
":NEXT'AFF PILIER 
280 SOUND 1 Ce te RE AT=1 TO 2O0O00:NE 


1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=1i TO S50’S0 MOUVMTS MAXI ADMIS 
POUR ATENDRE CIBLE 

1020 REM MISSILE,HEURIST NAV (1 
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1030 IF PXMI<>PXC THEN NUME=ABS (PYMI-PYC 
) : DENO=ABS (PXMI-PXC) : IN=NUME/DENO ELSE 1 


060 

1040 IF IN<O.S5 THEN VXMI=SGN(PXC-PXMI):V 
YMI=0:GOTO 1070 

1050 IF IN>2 THEN VXMI=O: VYMI=SGN(PYC-PY 
MI) :GOTO 1070 


du VXMI=SGN(PXC-PXMI) : VYMI=SGN(PYC-PYM 
Ts TT=0’INIT RANG DE PASS DS SSPROG HE 
1080 PXMI=PPXMI+VXMI:PYMI=PPYMI+VYMI. 
1090 IF PXMI>31 THEN 1110 ELSE GOSUB 300 
O’TEST HEURT PILIER 

1100 IF OBS=1 THEN 1080 

1110 PEN TE LOCATE PPXMI,PPYMI:PRINT CHRS 
(33) : PEN el RE PYMI: : PRINT CHRS (3 
3): SOUND 1,30,5,7: MI=PXMI : PPYMI=PYMI 
1120 GUSUR 2009! TÉST CIBLÉ ATTEINTE 

1130 Lu TO one HNÉREE NEXT M 


FOR 

1140 SOUND 1,500 ‘FOR AT=1 TO 800:NE 

XT:GOTO 110” + ÉRRCOU RE” RATE 

1150 END 

2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPRO G HEURT PILIER 

3010 OBS=0’NEUTRAL HEURT PRÉCEDENT 

3020 FOR RD TO 36: TE PRMISPRPTIN) THEN 
3060 ELSE IF PYMTE EYE UN) THEN 3060 
3030 FOR AT=1 TO 150:NEXT:SOUND 1,24,5,7 
::PEN 2:LOCATE PXMI,PYMI:PRINT"#"!FOR ÀT 
si, 10 SO:NEXT:PEN 1:LOCATE PXMI,PYMI:PRI 
3040 VXMI=1:VYMI=-1’HEURIST DE DEGAGEMEN 


T_ (A) 

3050 N=30:0BS=1’ SORTIE BOUCLE DE RECHERC 

SEP re SU den ET SIGNALMT OBSTACLE 
3070 FOR AT=1 TO SO:NEXT:TT=TT+1:1F TT<é 
THEN RETURN ELSE FOR AT=1 TO 800:NEXT:6G 

OTO 110’CAS OÙ LE MISSILE NE TROUVE PAS 
DE PLACE LIBRE 

4000 REM SSPROG CIBLE ATTEINTE 

4010 IF PXMI<2>PXC = RETURN ELSE IF PY 

MI<>PYC THEN RETUR 

4020 FOR FOIS=1 T0 4: SOUND 1, : FOR 

ai TO 100:NEXT:NEXT:FOR AT= 1740 800: NE 


4030 RG=RG+1:IF RG<4 THEN PEN 3:LOCATE P 
DS SERMÉESRRENT CHR$ (33): GOTO 180 ELSE 
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Commentaires techniques 


Les piliers sont volontairement placés dans la zone du parcours que 
doit emprunter le missile, avec une marge aléatoire de dispersion. C’est 
ce qui explique la forme curieuse de l’expression mathématique qui 
donne la valeur de l’ordonnée PYPI des piliers ; il est assez facile de 
voir que la relation entre PXPI et PYPI est une fonction linéaire, donc 
une droite passant par la cible et par le point de départ du missile, 
assortie d’une certaine marge et de quelques garde-fous complémen- 
taires. 


On a choisi, comme dans la plupart des programmes qui suivront, l’heu- 
ristique de navigation 1, bien qu’elle ne soit pas la plus simple. Ce 
choix est arbitraire et facilement modifiable. 


Dans le sous-programme obstacle, on limite à 5 le nombre de tentati- 
ves infructueuses de dégagement (variable TT) puisque toute tenta- 
tive du même genre est vouée à l’échec. 
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ÉTAPE E7 
VIVENT LES ROBOTS ! 


Présentation 


Nous arrivons au premier exemple digne, à nos yeux, de mériter le 
label de l'I.A., un petit label d’amateur dans lequel notre projectile larve, 
devenu missile chrysalide dans le cocon E4-E5-E6, apparaît maintenant 
dans sa livrée de robot libellule. 

C'est le choix décisif d’une heuristique de dégagement appropriée qui 
va lui conférer ce standing et qui lui permettra, au fil des exemples sui- 
vants, d'en mériter les grades supérieurs. Appelons-la heuristique B. 

La simple idée de base est que, puisque le robot, au moment où il 
touche un pilier, ignore où se trouve les autres obstacles du voisinage, 
il doit essayer une autre case puis, en cas d’insuccès, une autre, etc. La 
manière la moins fatigante de le faire consiste à tâter une case au hasard, 
puis une autre au hasard, jusqu’à trouver une case libre. 

Le résultat est assez spectaculaire et ce système de bas étage réussit tou- 
jours à mener notre robot à son maître dans la limite réglementaire des 
50 pas maximaux admis. 

J'ai omis de préciser qu’il n’y a plus de cible, mais un maître aimant 
son robot et adoré de lui, le second ne songeant qu'à rejoindre le premier. 

Outre son efficacité, essentiellement due à l'élimination de tout blo- 
cage, cet exemple illustre la possibilité de choisir plusieurs attitudes et 
d'introduire du libre arbitre grâce à une ignorance partielle des données 
(la présence et la position d'éventuels piliers dans le voisinage). 

Le programme suivant répète trois parcours sur le même terrain et l'on 
voit notre robot hésiter, tâtonner, revenir parfois sur ses pas, et partir 
par des chemins divers. Ce robot décontracté perdra de sa spontanéité 
plus tard, au fur et à mesure que ses facultés se développeront. 

Pour l'instant, accordons-lui le diplôme de robot, car il possède main- 
tenant bon nombre des critères significatifs du Chapitre li si l'on excepte 
a, b, j, k et / qui apparaîtront ultérieurement. 


Programme 
100 ?’ETAPE E7:1ER PROGRAMME DE ROBOT; RGB 
OT CHERCHANT SON MAITRE DANS LABYRINTHE. 
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31 PILIERS,HEURISTIQUE DE NAVIGATION (1) 
HEURISTIQUE DE DEGAGEMENT (B),3 PARCOUR 
Ë SUR MEME TERRAIN 

110 INK O,16:INK 1,1:INK 2,6:INK 3,21:CL 
S:CLEAR 

120 DIM PXPI(30),PYPI(30)’LISTE DES COOR 
DONNEES DES 31 PILIERS 

130 SYMBOL AFTER 32:SYMBOL 233,&0,&k7C,&Dé 
,k6C,L38,RFE,&7C, RC’ DESSIN ROBOT; DESSIN 
MAITRE : ÉODE 250 

140 *NOMÈRES ALEATOIRES VARIES 

150 RANDONIZE TIME 

160 RG=1RANG DU PARCOURS 

170 CLS:H=INT(IZXRND):1IF H=1 THEN PXM=INT 
(25XRND+5) :PYM=6 ELSE PXM=6:PYM=INT (12XR 

ND+5)’TIRAGE POSITION MAITRE 

180 PXR=36: PYR=21’ POSITION DEPART ROBOT 

190 _PPXR=PXR : PRYRSPYR MISE EN RES POUR 
200 PEN 1:LOCATE PXR,PYR:PRINT CHRS& (33): 
PEN 2:LOCATE PXM,PYM:PRINT CHRS&(250)°AFF 
ROBOT ET MAITRE 

210 IF RG)>1 THEN 280 


220 FOR N=0O TO 30:PXPI(N)=INT((33-PXM)XR 
ND) +PXM-1:PYPI(N)=INT((21-PYM) /(36-PXM) X 
(PXPI(N) -PXM))+INT((SXKRND-2) X (PXPI (N) -PX 


230 IF PYPI >PYM-2 THEN 250 
240 PYPI(N) M-1:GOTO0 270 
250 IF PYPI 


N) 

PY 

N)<>PYM THEN IF PYPI(N)<22 T 
PYPI(N)=21:GO0OTO0 270 

En PXPIIN)E>PXM THEN 270 ELSE PYPI(N 


270 PEN 1:LOCATE PXPI(N),PYPI(N):PRINT"= 
":NEXT'AFF FILIER 
280 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
XT°TOP DEPART 
1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=i TO 50°50 MOUVMTS MAXI ADMIS 
POUR ATTEINDRE MAITRE 

1020 REM HEURIST NAU (1) 

1030 IF FXRC)PXM THEN NUME=ABS (PYR-PYM) : 
DENO=ABS (PXR-PXM) : IN=NUME/DENO ELSE 1060 
1040 IF IN<O.5 THEN VXR=SGN(PXM-PXR) : UYR 
=0:G0T0 1070 

1050 IF IN>2 THEN VXR=0:VYR=SGN(PYM-PYR) 
:GOTO 1070 

1060 VXR=SGN(PXM-PXR) : VYR=SGN (PYM-PYR) 
1070 PXR=PPXR+UXR: PYR=PPYREUYR 

1080 IF PXR)31 THEN 1100 ELSE GOSUB 3000 
TEST HEURT PILIER 

1090 1F OBS=1 THEN 1070 

1100 PEN 3:LOCATE PPXR,PPYR:PRINT CHR$(3 

3):PEN 1:LOCATE PXR.PYR:PRINT CHR#(33):5 
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OUND 1,30,5,7:PPXR=PXR:PPYR=PYR 

1110 ÉbSUÉ 2660” TEST MAITRE RÉDOINT 

1120 FOR AT=1 TO SO0:NEXT:NEXT M 

1130 SOUND 1,500,40,7:GOT0 4030’ PARCOURS 
RATE 

114 

200 


O0 END 
O REM ZONE DES SOUS-PROGRAMMES 
3000 REM re HEURT PILIER 
3010 OBS=0’NEUTRAL HEURT PRECEDENT 
3020 FOR N=0 TO 30:1F AC A PAU Sen 
3080 ELSE IF NS de THEN 
ee FOR AT=1 TO 150:NEXT: SOÛND. 1 924 cE ? 
: PEN 2: LOCATE FAR PYR:PRINT"X#" : FÜR =) 
"TO SO:NEXT:PEN 1:LOCATE PXR,PYR: PRINT" S 


3040 REM HEURIST DE DEGAGMT (B) 

3050 SI=INT(SXRND)-1 :1IF S1<>0 THEN S2=I 
NT(S3XRND) -1 ELSE S2= ROM ee 

3060 VXR=SGN(S1) RS (S2 

3070 N=30 :0BS=1 ORTIE BOUCLE DE RECHE. 
RCHE DES OBSTACLES ET SIGNALMT OBSTACLE 
3080 NEXT N 

3090 RETURN 

4000 REM SSPROG MAITRE REJOINT 

4010 IF PCF THEN RETURN ELSE IF PYR 
<>PYM THEN RETU 

4020 FOR FOIS=1 Ro 4: SOUND 1,27,5,7:FOR 
AT=1 TO 100:NEXT:NEXT 

4030 FOR AT=i TO S8O0:NEXT:RG=RG+Ii:IF RG 

4 THEN PEN 3:LOCATE PPXR, PPYR: PRINT cÜRS 
(33): GOTO 180 ELSE 110 


Commentaires techniques 


Dans le sous-programme heurt pilier, la direction de dégagement est 
tirée au sort par le relais des deux variables S1 et S2, susceptibles de prendre 
une valeur positive, négative ou nulle et fixant ainsi la valeur des 
composantes VX et VY à 1, — 1 ou 0, permettant donc d'atteindre sui- 
vant les cas l’une des huit positions contiguës. 
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V 


À LA RECHERCHE D'UNE MARTINGALE 


‘‘Puisque ces mystères me dépassent, feignons d’en 
être l’organisateur.”’ 


J. COCTEAU. 


Jouer aux dés pour trouver la sortie, telle est l’essence de l’heuristique 
de dégagement B de L'étape précédente. 

Mais il y a de multiples façons de jouer aux dés, y compris en les pipant 
pour faire sortir plus souvent les bons numéros. C'est à cette œuvre de 
longue haleine que notre robot va progressivement se consacrer dans le 
présent chapitre, de E8 à E13. 

Il va d’abord essayer de dénicher une martingale infaillible, comme 
le sont toutes les martingales avant qu’on les essaie, puis, déçu par 
l'indifférence constante du dieu Hasard, il perdra la foi et se décidera. 
à décider lui-même. 

Nous verrons ainsi successivement à l’œuvre les heuristiques de 
dégagement C, D, E et F, en attendant mieux. La technicité des 
programmes de démonstration en est progressivement accrue, car les 
facultés sensorielles ou intellectuelles supplémentaires requises, en 
particulier les fonctions de mémorisation et de comparaison, se traduisent 
par des manipulations supplémentaires d'informations. 

Avant de poursuivre le chemin ainsi tracé, faisons rapidement le point 
de ce que nous pouvons maintenant dire, concrètement, des heuristiques 
introduites aux étapes E4 et EG. 

L'heuristique de ravigation permet d’élaguer l'arbre très touffu des 
mouvements possibles, en ne retenant que les meilleurs, abstraction faite 
des obstacles : c'est une sfratégie d'attaque. 

L'heuristique de dégagement permet de #raiter les obstacles de la 
meilleure façon : c’est une zactique de défense. 

C'est à dessein que les mots caractéristiques ont été mis en relief pour 
marquer, non pas leur opposition, mais leur complémentarité. Cette 
clarification des idées, ainsi que la terminologie choisie pour les exprimer, 
me semble aller bien au-delà des préoccupations ludiques de nos petits 
bonshommes ! 


1. Jacques Pitrat a développé le premier, en termes différents, et à propos du jeu d'échecs, l'idée 
de stratégie élagueuse : Journal of Artificial Intelligence, vol. 8, n° 3, juin 1977. 
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ÉTAPE E8 
UN PEU D'ORDRE 


Présentation 


Avec l’heuristique de dégagement B de E7, le robot misait totalement 
sur le hasard pour trouver une case libre parmi les huit à portée de son 
pied. Il pouvait tomber sur une telle case du premier coup ou faire de 
très nombreuses tentatives, 5, 10, ou même 100 avant d’y parvenir. Avec 
un peu de patience, on assiste effectivement à des sarabandes de ce genre 
sur l'écran. 

Cette fois, il fait un effort d'organisation (le moins fatigant des efforts 
intellectuels) en tirant la première direction au hasard puis, en cas d’insuc- 
cès, en explorant les sept autres positions dans l’ordre, soit dans le sens 
des aiguilles d’une montre normalement constituée, soit dans le sens 
inverse, ce sens de rotation étant lui-même tiré au hasard. On obtient 
ainsi l’heuristique de dégagement C. 

L’indéterminisme du trajet subsiste intégralement puisque la première 
direction est tirée au sort ainsi que le sens d’exploration. On peut cons- 
tater, à l'exécution du programme suivant, que les trois parcours succes- 
sivement effectués sont aussi variés que dans E7. 

Mais il y a une différence essentielle : le nombre maximal de tentati- 
ves infructueuses est réduit à 7 et, moins évident, le nombre #70yen de 
tentatives infructueuses est également plus faible, car tout risque de répé- 
tition est exclu. Les trajets sont donc plus rapides qu’en E7. 

Cette heuristique implique, en contrepartie, que le robot soit doué 
de mémoire pour organiser son exploration circulaire. Bien entendu, le 
programme démonstratif doit, lui aussi, simuler cette mémorisation. 


Programme 


100 ’ETAPE ES8:ROBOT CHERCHANT SON MAITRE 
DANS LABYRINTHE,31 PILIERS, HEURISTIQUE 
DE NAVIGATION (13,HEURISTIQUE DE DEGAGEN 

ENT (C),4 PARCOURS SUR MEME TERRAIN 

110 INK O,16:INK 1,1:INK 2,6: INR ei 21:CL 
8: CLEAR 

120 DIM PXPI(30) ,PYPI(30)’LISTE DES COOR 
DONNEES DES 31 PILIERS 
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130 SYMBOL AFTER 32:SYMBOL 33,&0,&7C,&Dé 
,kéC,&38,RFE,&7C, RC’ DESSIN ROBOT; DESSIN 
MAITRE: CODE 250 

140 *NOMBRES ALEATOIRES VARIES 

150 RANDOMIZE TIME 

160 RG=1’RANG DU PARCOURS 

170 CLS:H=INT(Z2XRND):IF H=1 THEN PXM=INT 
(25XRND+6) :PYM=6 ELSE PXM=6: PYM=INT (12XR 
nn Eee LL nr P an ces 

236: PYR=21? RT ROBOT 

190 PPXR=PXR: PPYR=PYR *MISE EN RES POUR 
200 PEN 1:LOCATE PXR,PYR:PRINT CHR#(33): 
PEN 2:LOCATE PXM,PYM!:PRINT CHRS(250)°AFF 
ROBOT ET MAITRE 
210 IF RG>1 THEN 280 
320 FOR N=0 TO 30:PXPI(N)=INT((33-PXM)XR 
ND) +PXM-1:PYPI(N)=INT((21-PYM) / (36-PXM) X 
(PKPI (ND) =PXM) )+INT ((SXRND-2)X(PXPI (N)-PX 
M) /8) +PYM+1 


230 IF PYPI(N)>PYM-2 THEN 250 

240 PYPI(N)=PYM-1:GOTO 270 

250 IF PYPI(N)<>PYM THEN IF PYPI(IN)<22 T 
HEN 270 ELSE PYPI(N)=21:GOTO 270 

2er PXPI(N)<>PXM THEN 270 ELSE PYPI(N 


270 PEN 1:LOCATE PXPI(N),PYPI(N) :PRINT"= 
NINEXT’AFF PILIER 

280 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
XT’TOP DEPART 

1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=1 TO 50°50 MOUVMTS MAXI ADMIS 
POUR ATTEINDRE MAITRE 

1020 REM HEURIST NAV (1) 

1030 IF PXRC>PXM THEN NUME=ABS (PYR-PYM) : 
DENO=ABS (PXR-PXM) : IN=NUME/DENO ELSE 1060 


1040 IF IN<O.5 THEN VXR=SGN(PXM-PXR) : VYR 
=0:GOTO 1080 

1050 IF IN>2 THEN VXR=0O:VYR=SGN(PYM-PYR) 
: GOTO 1080 

1060 VXR=SGN(PXM-PXR) : VYR=SGN (PYM-PYR) 
1070 TT=0’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN PILIER 

1080 PXR=PPXR+VXR: PYR=PPYR+UYR 

1090 IF PXR>31 THEN 1110 ELSE GOSUB 3000 
*TEST HEURT PILIER 

1100 1F OBS=1 THEN 1080 

1110 PEN 3:LOCATE PPXR,PPYR: PRINT CHRS1( 
3):PEN 1:LOCATE PXR PYR: PRINT CHR$(33) : 
OUND 1,30,5, 

ice GbSUB 3000’TEST MAITRE REJOINT 


3 
S 
7: PPXR=PXR: PPYR=PYR 

O FOR N=1 TO 8O0:NEXT:NEXT M 
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RE UP 1,5300,40,/7:GOT0O 4030’ PARCOURS 


1150 END 
2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG HEURT PILIER 

3010 OBS=0:TT=TT+1 

3020 FOR N=0 TO 30:1F PXR<>PXPIIN) THEN 
3190 ELSE IF PYRCOBYPI (N) THEN 3190 

3030 FOR AT=1 TO : NEXT : SOUND 

::PEN 2:LOCATE PxR SRYR: PRINT" Ne: FOR A9 Î 
“TO SO:NEXT:PEN 1:LOCATE PXR, PYR: PRINT "= 


3040 REM HEURIST DE DEGAGMT (C):TIRAGE À 
U SORT 1ERE DIRECTION DE DEGAGEMENT, PÜIS 
EN CAS D’INSUCCES,EXPLORATION ORDONNEE 
ÈS AUTRES DIRECTIONS 
3050 IF TT=1 THEN HAS=INT (S#RND+1)::SS=I 
NT CZXRND) : GOTO 3090 
3060 IF SS=0 THEN HAS=HAS+1::1F HAS<9 TH 
EN 3090 EL HAS= HAS-8:GOTO 3090 
3070 HAS=HAS-1:1F HAS)0 THEN 3090 
3080 HAS=HAS+ ë 
3090 IF HAS=1 THEN 3100 ELSE IF HAS=2 T 
HEN 3110 ELSE IF HAS=3 THEN 3120 ELSE IF 
HAS=4 THEN 3130 ELSE IF HAS=5 THEN 3140 
ELSE IF HAS=6 THEN 3150 ELSE 1F HAS=7 T 


HEN 3160 ELSE 3170 

3100 VXR=I1: VYR=1: GOTO 3180 
3110 VXR=1:VYR=O: GOTO 3180 
3120 VXR=1:VYR=-1: GOTO 3180 
3130 VXR=O: VYR=-1: GOTO 3180 
3140 VXR=-1:VYR=-1: GOTO 3180 
3150 VXR=-1:VYR=O: GOTO 3180 
3160 VXR=-1: VYR=1: GOTO 3180 
3170 VXR=O:VYR=I 

3180 N=30:0BS=1 

3190 NEXT N 

3200 RETURN 

4000 REM SSPROG MAITRE REJOINT 
4010 IF PXR<>PXM THEN RETURN ELSE IF PYR 


{>PYM THEN RETURN 

4020 FOR FOIS=1 TO 4:SOUND 1,27,5,7:FOR 

AT=1 TO 100:NEXT:NEXT 

4030 FOR AT=1 TO 800: NEXT:RG=RG+1:1IF RGK 
S THEN PEN 3:LOCATE PPXR, PPYR: PRINT CHR$ 
(33): GOTO 180 ELSE 110 


Commentaires techniques 


e C’est le sous-programme heurt pilier qui est modifié par rapport à E7. 


e Il faut un paramètre de comptage du rang de passage dans ce sous- 
programme à partir du moment où le robot se trouve au contact d’un 


pilier. C’est le rôle de la variable TT qui est initialisée à O avant le 
premier calcul de position, puis est augmentée (incrémentée) de 1 à 
chaque passage dans le sous-programme. 

Lorsqu'une position libre est trouvée, elle est occupée par le robot 
et, au prochain mouvement, c’est-à-dire à la prochaine boucle, le para- 
mètre TT sera ramené à O. 


Au premier passage (TT = 1), le sous-programme tire au sort la pre- 
mière direction testée parmi les huit possibles : c’est la variable HAS 
dont chaque valeur de 1 à 8 correspond à une orientation (1 = SE, 
2=E,3 =° NE, 4 = N;,5.= NO; 6 = 0,7 = 50,8 =-Sj:Iltite 
également le sens de rotation : variable SS à choisir entre 0 ou 1. 


Aux passages suivants (TT = 2, puis 3... si les tentatives restent infruc- 
tueuses), HAS est augmentée de 1 ou diminuée de 1 suivant le sens 
d'exploration SS tiré au départ. 


À noter que si HAS ainsi modifiée est comprise entre 1 et 8 tout va 
bien, mais si HAS sort de ses limites on l’y ramène en lui ajoutant 
ou tretranchant 8. 
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ÉTAPE E9 
LA PUISSANCE DES PRÉDICATS 


Présentation 


La présente étape introduit une heuristique de dégagement D nette- 
ment plus évoluée que les précédentes ainsi qu’un nouveau mode de repré- 
sentation des piliers dans le programme de simulation, utilisant la notion 
de prédicat, très prisée en I.A. 

Éxaminons d’abord l'heuristique D, les prédicats étant eux-mêmes abor- 
dés dans les commentaires techniques du programme ci-après. 

Le robot, au contact d’un pilier, opère comme en E8, mais en s’impo- 
sant une condition supplémentaire : il s’interdit de revenir, en se déga- 
geant, sur la position qu'il occupait précédemment, sauf si aucune autre 
position n’est libre. Cette manière de penser est très naturelle puisqu'elle 
consiste à remarquer que, s’il y a un retour en arrière, au pas suivant 
le robot se retrouvera bêtement au même endroit, au contact du même 
pilier (pas de pèlerin ou pas de clerc, mais sûrement pas perdu). 

Ce qui suppose que notre ami se souvienne de son dernier pas et que 
cela soit simulable. Ça l’est de plusieurs façons possibles, soit en mémo- 
risant la position précédente (PPPX = PPX et PPPY = PPY), soit en 
mémorisant la vitesse du pas précédent (VVX = VX et VVY = VY). 
En E25 nous utiliserons une troisième méthode exploitant les fonctions 
logiques. 

Pour l'instant, c’est la deuxième méthode qui sera adoptée, la plus 
simple en l’état actuel de notre progression. 

La supériorité de l’heuristique D est très sensible ; les ‘‘tours de valse’”” 
constatés antérieurement, inadmissibles pour un esprit humain, sont pres- 
que éliminés, même si certains doubles retours en arrière, inexistants en 
E8, sont maintenant possibles. 

L'indéterminisme est toujours présent, mais les parcours ont une autre 
allure, moins erratique. 

En outre, la rapidité d'exécution due à l’utilisation des prédicats donne 
à Roméo — c’est ainsi que nous l’appellerons désormais — le pas alerte 
d’un conquistador, et cela malgré l'installation d’un frein dans le sous- 
programme de recherche d’une nouvelle direction, pour améliorer la per- 
ception des stades de réflexion du robot. Ce frein est classiquement réa- 
lisé par une boucle d'attente. Si le lecteur le supprime, les explorations 
sont menées à un train d’enfer qu'il est impossible de suivre. 
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Programme 


100 ’ETAPE E9:ROBOT CHERCHANT SON MAITRE 
DANS LABYRINTHE, 31 PILIERS, HEURISTIQUE 
DE NAVIGATION (13,HEURISTIQUE DE DEGAGEM 
ENT _(D),4 PARCOURS SUR MEME TERRAIN, NOUV 

ELLE REPRESENTATION DES PILIERS 

110 INK O,19:INK 1,6:INK 2,1:INK 3,17:CL 
8: CLEAR 

120 DIM C(31,25)’TABLEAU DES COORDONNEES 
DES CASES DÉ L'ECRAN SUSCEPTIBLES DE RE 

CEVOIR UN PILIER 

130 SYMBOL AFTER 32:SYMBOL 33,&0,&7C,&Dé 
,k6C,R38,RFE,&7C,R6C’ DESSIN ROBOT; DESSIN 
MAITRE: ÉODE 250 

140 NOMBRES ALEATOIRES VARIES 

150 RANDOMIZE TIME 

160 RG=1'RANG DÙÜ PARCOURS 

170 CLS:H=INT(2XRND):1F H=1 THEN PXM=INT 
(25XRND+6) : PYM=6 ELSE PXM=6: PYM=INT (12%XR 

ND+6)’TIRAGE POSITION MAITRE 

180 PXR=36: PYR=21:PPXR=PXR!: PPYR=PYR’ POSI 

TION DEPART ROBOT ET MISE EN RESERVE POU 
190 PEN 1:LOCATE PXR,PYR:PRINT CHR$(33) : 
PEN 2:LOCATE PXM,PYM!PRINT CHR (250) ° AFF 
ROBOT ET MAITRE 

200 IF RG>1 THEN 1000 

210,F0R_N=0 TO 30: TERRS=INKEVS: 1F TERRS< 


>" " THEN 220 ELSE 11 

220 I=INT((33-PXM) XRND) +PXM-1:J=INT((21- 
PYM)/(36-PXM)X(I-PXM))+INT((SXRND-2)X(I- 
PXM) /8) +PYM+1 

230 IF J>PYM-2 THEN 250 

240 J=PYM-1:GOTO 270 

250 IF J<>PYM THEN IF J<22 THEN 270 ELSE 


J=21:G0T0 270 
260 IF I<>PXM THEN 270 ELSE J=PYM-1 

270 PEN 1:LOCATE 1,J:PRINT"=":C(I,J)=1:N 
EXT'AFF ET REPRESENTATION PILIER 

280 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
XT'TOP DEPART 

1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=1 TO 50°50 MOUVMTS MAXI ADMIS 
POUR ATTEINDRE MAITRE 

1020 REM HEURIST NAV (1) 

1030 IF PXR<)>PXM THEN NUME=ABS (PYR-PYM) : 
DENO=ABS (PXR=-PXM) : IN=NUME/DENO ELSE 1060 


1040 IF IN<O.S THEN VXR=SGN(PXM-PXR) : VYR 
=0:GOTO 1070 

1050 IF IN>2 THEN VXR=O:VYR=SGN(PYM-PYR) 
: GOTO 1070 
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1060 VXR=SGN(PXM-PXR) : VYR=SGN (PYM-PYR) 

1070 TT=0’INITIALISATION DU RANG TT DES 

TENTATIVES POUR TROUVER UNE POSITION LIB 

RE APRES AVOIR HEURTE UN PILIER 

1080 PXR=PPXR+UXR: PYR=PPYR+UYR 

1090 IF PXR)31 THEN 1120 ELSE GOSUB 3000 

TEST HEURT PILIER 

1100 IF OBS=0 THEN 1120 ELSE GOSUB 5000” 

ESSAI NOUVELLE DIRECTION 

1110 GOTO 1080’RECALCUL POSITION 

1120 GOSUB 4000! TEST RETOUR EN ARRIERE 
IF RET=0 THEN 1150 ELSE GOSUB 5000? 

SAI NOUV DŸR 

40 GOTO 1080’RECALCUL NOUV 

50 PEN 3:LOCATE PPXR, PPYR: PRINT CHRS ( 

: PEN : LOCATE PXR,PYR:PRINT CHR$(33) : 

1 30, 5,7: PPXR=PXR: PPYR=PYR 

O VÜUXR= OXR: : UUYR=UVYR ? MEMD VITESE POUR 

TER PROCHAIN RETOUR EN ARR 

70 GOSUB 6000’ TEST MAITRE REJOINT 

80 FOR N=1 TO S8O0:NEXT:NEXT M 

90 SOUND 1,500,40,7:GOT0 6030? PARCOURS 


3 
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D 
2000 REM ZONE DES SOUS-PROGRAMMES 
3000 BEC 2 HEURT PILIER 


3020 IF C(PXR,PYR)<)>1 THEN RETURN 
3030 FOR AT=1 TO 150:NEXT:SOUND 1,24,5,7 
:PEN 2:LOCATE PXR, PYR:PRINT"#X":FOR Af=i 
LOPRoËNEXTe PEN 1ÉLOCATE PXR, PYR:PRINTr =" 

3040 OBS=1:TT=TT+1 

3050 RETURN 

4000 REM SSPROG RETOUR EN ARRIERE 

4010 RET=0’NEUTRAL RET ARR PRECEDENT 

4020 IF VIRE UUXR THEN RETURN ELSE IF V 

YR<CD-VUYR THEN RETURN 

4030 IF TT)? THEN RETURN ELSE FOR AT=1 T 

O 100:NEXT AT:SOUND 73PEN 2:LOCAT 

E PXR,PYR: PRINT SET FOR DS 1° TO 150:NEXT: 

PEN 3!LOCATE PXR, PYR: PRINT cHRs 133) DRÈT 
:TT=TT+1: RETURN” 

2500 RE SSPROG ESSAI NOUVELLE DIRECTION 

5010 REM HEUR IST IQUE DE DEGAGEMENT (D):T 

IRAGE , 1ERE DIRECTION DE DEGAGMT PUIS,EN 

CAS D’ INSUCCES EXPLOITATION ORDONNEE DES 

AUTRES DIRECIONS 

5020 FOR AT=1 TO 100:NEXT AT:IF TT=1 THE 

N HAS=INT (8XRND+1) :SS=INT (2XRND) : GOTO 50 


60 

J030 IF SS=0 THEN HAS=HAS+1::1F HAS<9 TH 
EN 5060 ELSE HAS=HAS-8:GOTO 5060 

9040 HAS=HAS-1:1F HAS>0O THEN 5060 

9050 HAS=HAS+8 


sd 


5060 IF HAS=1 THEN 5070 ELSE IF HAS=2 T 
HEN 5080 ELSE IF HAS=3 THEN 5090 ELSE IF 
HAS=4 THEN 5100 ELSE IF HAS=S THEN 5110 
ELSE IF HAS=6 THEN 5120 ELSE IF HAS=7 T 


HEN 5130 ELSE 5140 

9070 VXR=1: VYR=1: GOTO 51350 
5080 VXR=1:VYR=0:GOTO 5150 
9090 VXR=1: VYR=-1: GOTO 5150 
9100 VXR=O: VYR=-1: GOTO 5150 


3110 VXR=-1: VYR=-1: GOTO 5150 
5120 VXR=-1:VYR=0O:GOTO 5150 
93130 VXR=-1: VYR=1: GOTO 5150 
9140 VXR=O:VYR=I 

91950 RETURN 

6000 REM SSPROG MAITRE REJOINT 


6010 IF PXR<>PXM THEN RETURN ELSE IF PYR 
{>PYM_ THEN RETIRE 

6020 FOR FOIS=1 TO 4:SOUND 1,27,5,7:FOR 

AT=1i TO 100: NEXT: NEXT 

6030 FOR AT=1 TO SOO:NEXT:RG=RG+1:1F RG 
5 THEN PEN 3:LOCATE PPXR, PPYR: PRINT CHR$& 
(33): GOTO 180 ELSE 110 


Commentaires techniques 


e Les piliers ne sont plus représentés par leurs coordonnées PXPI(N) et 
PYPI(N) comme précédemment, mais par leurs coordonnées I, J; leur 
rang N n’est pas mémorisé car Roméo se moque de connaître le numéro 
du pilier auquel il se heurte, il a seulement besoin de savoir si, à cette 
position, il y a ou non un pilier. 

Pour chaque pilier de coordonnées I, J ainsi tiré au sort, on définit 
une variable C(I, J) qui prend alors la valeur 1. La variable C(I, J) garde 
la valeur 0 pour toutes les cases d’écran de coordonnées I, J non occu- 
pées par un pilier. 

En fait, C(I, J) est donc une proposition de même nature que OBS, 
qui peut prendre l’une des deux valeurs rar ou faux. Mais cette pro- 
position est affectée de deux arguments I et J représentant les coor- 
données de l’endroit pour lequel elle fournit son information. 

Une telle proposition variable, munie d'arguments localisateurs ?, 
prend le nom de prédicat. En somme, un prédicat est à une proposi- 
tion ce qu’une variable est à une constante. 


2. Ces arguments numériques pourraient tout aussi bien, mais le BASIC ne le permet pas, être 
des ‘‘mots’’ et représenter autre chose que des coordonnées ; par exemple, si I représente un pays 
et si J représente une ville, et si le prédicat CAP(I, J) est une proposition affirmant que J est la 
capitale de I, on a CAP(FRANCE, PARIS) = 1 et CAP(USA, BLOIS) = 0. 
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e Les cases de l’écran sont ainsi divisées en deux sous-ensembles : celles 
où il n’y a rien et celles où il y a un pilier. 
Le prédicat est un mode simple et puissant de représentation quali- 
tative de l’univers du robot. 
Nous accéderons en E18, puis en E25 et E26, à une notion encore 
plus générale, celle de fonction logique. 


e Dans le sous-programme heurt pilier, le prédicat C(I, J) est instanta- 
nément exploitable, sans recherche fastidieuse de la coïncidence suc- 
cessive de la position du robot avec celle de chacun des 30 piliers. En 
effet, le robot étant placé aux coordonnées PXR et PYR, il suffit d’exa- 
miner si le prédicat C(PXR, PYR) vaut 1 ou 0. Dans le premier cas 
le robot est au contact d’un pilier, sinon la route est libre. 

La simplicité du test est remarquable, ainsi que sa rapidité comme 
on peut en juger à l'exécution. 


e Sous-programme retour en arrière : il examine si les composantes VXR 
et VYR de la vitesse du pas envisagé (déterminées par le sous-programme 
essai nouvelle direction) sont bien, comme exigé, différentes du symé- 
rique des composantes VVXR et VVYR du pas précédent. Sinon, c'est 
qu’il y a retour en arrière. Le sous-programme examine alors quel est 
le rang TT de la tentative en cours. Si l’on en est à la huitième, on 
passe outre car le tour complet des explorations a été fait. 

Si par contre TT est inférieur à 8, on continue l'exploration pour 
trouver une position qui ne corresponde ni à un pilier, ni à un retour 
en arrière. 


e Pour faciliter la programmation de cette gymnastique mentale, on a 
scindé le processus en trois sous-programmes : 


Sous-programme heurt pilier, déjà examiné; 
Sous-programme retour en arrière, déjà examiné ; 
Sous-programme nouvelle direction. 


Chaque fois que l’un des deux premiers détecte une interdiction 
(présence d’un pilier ou retour en arrière), il renvoie au troisième qui 
déclenche l’exploration suivante et définit les composantes de la vitesse 
correspondante. La nouvelle position est alors recalculée et le cérémo- 
nial recommence jusqu’à détection d’une position valable. 

Le drapeau OBS des programmes précédents est complété, aux 
mêmes fins, par un drapeau RET. 

En plus de la visualisation habituelle, chaque tentative de retour 
en arrière intempestif est ponctuée d’un clic caractéristique pour per- 
mettre de suivre les opérations. 


76. 


e Attention lors du renvoi à un nouveau terrain quand les trois parcours 
du terrain précédent sont terminés : il faut annuler les piliers du ter- 
rain précédent, soit en passant par une instruction de neutralisation 
générale des variables si elle existe (CLEAR), soit en ramenant à 0 les 
prédicats C(L, J) pour toutes les positions I, J de l'écran. Sinon, les 
anciens piliers subsisteraient dans leurs effets bien qu'ils ne fussent plus 
affichés à l'écran. 


D'une manière générale, avec ce système de représentation, l’appari- 
tion d’un élément quelconque doit se concrétiser dans le programme de 
deux façons simultanées : 


e visuellement par affichage sur l'écran ; 
° sémantiquement par la valorisation à 1 du prédicat représentatif. 


Inversement, toute disparition d’élément doit se concrétiser par son 
effacement visuel et par son effacement sémantique (mise à 0 du prédicat). 
Nous y reviendrons dans le cas plus général de E25 et E26. 
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ÉTAPE E10 
ROMÉO PASSE L'IMPASSE 


Présentation 


Cet exemple est seulement destiné, mais c’est important, à illustrer 
l'efficacité de l’heuristique de dégagement D précédente dans le cas dif- 
ficile d’un chemin-piège en impasse. 

Si le robot s’engouffre dans une telle nasse, les heuristiques antérieu- 
res sont impuissantes à l’en sortir, car l’heuristique de navigation, quelle 
qu’elle soit, tend à le ramener constamment au fond de l’impasse. Il est 
facile de voir que l’heuristique D résoud parfaitement ce problème. 

Une fois sorti du mauvais pas, ou bien le hasard l’en écarte définitive- 
ment, ou bien Roméo refait joyeusement une plongée qu’il saura plus 
tard éviter. 


Programme 


100 ’ETAPE E10:ILLUSTRATON DE E9 PAR LE 
AS TNR OC 192 1N D’ QUE IMPASSE 
NK G:INK 1,6:INK 2,1:INK 3,17:CL 


10 

: CLEAR 

20 DIM c (81 25)’ TABLEAU DES COORDONNEES 

DES CASES DE L'ECRAN SUSCEPTIBLES DE RE 

EVOIR On SPTÈr ER 

30 SYMBOL AFTER 32:SYMBOL 33,&0,87C,&Dé 

.k6C,R28,LRFE, &7C L6C’ DESSIN ROBOT; DESSIN 

"MAITRE: ÉODE ’ 

140 NOMBRES AC ÉATOIRES VARIES 

150 RANDOMIZE TIME 

160 RG=1RANG DU PARCOURS 

170 CLS: PXM=7: PYM=INT (SYXRND) +10'TIRAGE P 

OSITION MAITRE 

180 PXR=30:PYR=12: PPXR=PXR: PPYR=PYR’ POSI 

TION DEPART ROBOT ET MISE EN RESERVE POU 

R TRA 

190 PEN 1:LOCATE PXR,PYR:PRINT CHR$(33): 

PEN 2:LOCATE PXM,PYMIPRINT CHR#(250) AFF 

ROBOT ET MAITRE’ 

20 Dar 24, Le PD2a, 19 28, 11129, 19 
.11,26,13,27,11,27,13,23,11,23,10,23 + 

83 5,23,13,:23,14,23,15,24,15,22,10,21,10 


C 
1 
S 
Î 
C 
i 


TT 


O5 
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O 
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Ÿ 
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O0 REM BOUCLE DES MOUVEMENTS 
M=1i TO 70°770 MOUVMTS MAXI ADMIS 
POUR ATTEINDRE MAITRE 
1020 REM HEURIST NAUV (1) 
1030 IF PXRÇ>PXM THEN NUME=ABS (PYR-PYM): 
DENO=ABS (PXR-PXM) : IN=NUME/DENO ELSE 1060 
1040 IF IN<SO.S5 THEN VXR=SGN(PXM-PXR) : VYR 
=0:GOTO 1070 
TO 1000 + THEN VXR=O:VYR=SGN(PYM-PYR) 
1060 VXR=SGN(PXM-PXR) : VYR=SGN (PYM-PYR) 
1070 TT=0’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN PIL Er 
1080 PFXR=PPXR+UVXR: PYR=PPYR+UY 
1070 _.IF PXR>29 THEN 1120 ÉLSE GOSUB 3000 
"TEST HEURT PILIER 
1100 IF OBS=0 THEN 1120 ELSE GOSUB 5000’ 
SSAI NOUVELLE DIRECTION 
10 GOTO 1080”? RECALCUL POSITION 
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O0 GOTO 1080’RECALCUL NOUV POS 
0 PEN 3:LOCATE PPXR,PPYR:PRINT CHR$(3 
PEN : LOCATE PXR,PYR:FRINT CHR$(33):5 
46. : PPXR=PXR: PPYR=PYR 

60 LURRE ER: : VUYR=UYR MEMO VITESE POUR 
ITER PROCHAIN RETOUR EN ARR 

70 GOSUB 6000’TEST MAITRE REJOINT 

80 FOR N=1 TO SO:NEXT:NEXT M 

190_SOUND 1,500,40,7:GOTO 6030? PARCOURS 


1200 END 
2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG HEURT PILIER 

3010 OBS=0 

3020 IF C(PXR, PYR)<>1 THEN RETURN 

3030 FOR AT=1 TO 150:NEXT:SOUND 1,24,5,7 
:PEN 2: L'OCATÉ PXR,PYR:PRINT"#": D FOË Af=i 
TO SO:NEXT:PEN 1:LOCATE PXR,PYR:PRINT"'=" 
3040 ÜES=1:TT=TT+I 

3050 RETURN 

4000 REM SSPROG RETOUR EN ARRIERE 


2 
3 
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RET=0’NEUTRAL RET ARR PRECEDENT 
ÎF VXR<>-VUXR THEN RETURN ELSE IF V 
-UUYR THEN RETURN 
IF TT)>7 THEN RETURN ELSE FOR _AT=1 T 

O:NEXT AT:SOUND ! :PEN 2:LOCAT 

R,PYR:PRINT"X":FÜR me _ TO 150:NEXT: 

3! LOCATE PXR, PVR: PRINT CHR$(33):RET=- 
TT+1:RETUR 

Lhen SBBROS ESSAI NOUVELLE DIRECTION 

O0 REM HEURISTIQUE DE DEGAGEMENQ (D):T 

IRAGE 1ERE DIRECTION DE DEGAGEMENT PUIS 
EN CAS D’INSUCCES,EXPLORATION ORDONNEE D 

ES AUTRES DIRECTIONS 

5020 FOR AT=1 TO NEXT AT:IF TT=1 THE 

Ne SET TS HRNDe 1 3 PSS DENT (24BND) , COTO 50 


80 IF SS=0 THEN HAS=HAS+I::1F HAS<9 TH 

EN S080 ELSE HAS=HAS-8:GOTO 5060 

5040 HAS=HAS-1:1F HAS)>O THEN 5060 

5050 HAS=HAS+8 

9060 IF HAS=1 THEN 5070 ELSE IF HAS 

En 5080 ELSE IF HAS=3 THEN 5090 ELS 
S 


C7TO0 


(e] 
Ô 
>- 
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DO-TMOR<ELE 
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AS=4 THEN 5100 ELSE IF HAS=S THEN 
ELSE IF HAS=6 THEN 5120 ELSE IF HA 
HEN 5130 ELSE 5140 
5070 VXR=1: VYR=1: GOTO 51350 
5080 VXR=1:VYR=O: GOTO 5150 
5090 VXR=I:VYR=-1: GOTO 5150 
9100 VXR=O:VYR=-1:GOTO 5150 


9110 VXR=-1:VYR=-1: GOTO 5150 

5120 VXR=-1:VYR=O: GOTO 5150 

5130 VXR=-1:VYR=1: GOTO Si50 

5140 VXR=O:VYR=I 

3150 RETURN 

6000 REM SSPROG MAITRE REJOINT 

6010 IF PXR<>PXM THEN RETURN ELSE IF PYR 


RN 
6020 FOR FOIS=1 TO 4:SOUND 1,27,5,7:FOR 
AT=1 TO 10O0:NEXT:NEXT 
6030 FOR AT=1 TO SOO:NEXT:RG=RG+1:IF RG 
5 THEN PEN 3:LOCATE PPXR,PPYR: PRINT CHRS 
(33): GOTO 180 ELSE 110 


Commentaires techniques 
Les piliers ne sont plus tirés au hasard car la position de ces obstacles 


répond à un souci particulier de démonstration. Aussi les positions sont- 
elles définies dans des lignes de data. 
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ÉTAPE E11 
ROMÉO SE TAIT 


Présentation 


Notre robot est, cette fois, soumis à la même épreuve d’impasse que 
précédemment et il utilise la même heuristique D. 

La différence consiste dans la suppression du dispositif audiovisuel du 
jalonnement intellectuel de Roméo. Seuls subsistent les bips rythmant 
ses pas. 

L'effet est inattendu : Roméo paraît plus intelligent qu’en E10. Ses 
processus mentaux sont devenus transparents, seuls ses actes apparaissent, 
comme dans la réalité du comportement humain. 

L'homme n’est pas essentiellement un animal doué de la parole, mais 
plutôt à mon avis un animal doué de la faculté de rester muet et d’agir 
en silence, faculté peu maîtrisée car elle implique le tri des communica- 
tions inutiles. 

La pensée ne semble pas avoir été faite pour être exhibée, mais pour 
préparer des actes physiques efficaces. Elle ne demande à être décorti- 
quée et autopsiée que dans certaines situations spéciales : enseignement, 
justification, adhésion à une action concertée. Écrire un livre représente 
également l’une de ces situations. 

Mais, dans les cas normaux et spécialement dans les situations person- 
nelles délicates, le silence est d’or, et l’une des dimensions de l’intelli- 
gence réside dans la discrétion avec laquelle elle fonctionne. L'esprit est 
l’un des moyens de compétition entre les humains, comme les biceps 
ou l’adresse manuelle, et sa vraie vocation est l’invisibilité, qu’on le déplore 
ou non. 

Dans le prolongément des réflexions amorcées en ES sur la mesurabi- 
lité de l'intelligence artificielle, on peut constater que le programme E11 
est plus court que E10 puisqu'il a été élagué de tout son parasitisme indû- 
ment destiné à autrui. La sauce a été réduite mais le mets subsiste, 
concentré, affûté. Ses adhérences sociales en ralentissaient d’ailleurs l’exé- 
cution ; devenu secret, il sécrète davantage. Il a un coefficient d’amplifi- 
cation supérieur, il contient plus d'intelligence, même si la morale n'y 
trouve pas son compte. 
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Programme 


100 ETAPE E11:COMME E10 SANS SONO NI VI 
SUALISATION 
re ÉRÉ O,19:INK 1,6:INK 2,1:INK 3,17:CL 


&: CLEA 

126 Ti C(31,25)’TABLEAU DES COORDONNEES 
DES CASES DÉ L'ECRAN SUSCEPTIBLES DE RE 

CEVOIR UN PILIER 

130 SYMBOL AFTER 32:SYMBOL 33,&0,&k7C,&D6 
kéC,R38,LFE,&7C,R6C’ DESSIN ROBOT; DESSIN 
"MAITRE: CODE 250! 

140 NOMBRES ALEATOIRES VARIES 

150 RANDOMTZE TIME 

160 RG=1’RANG DÙÜ PARCOURS 

170 CLS: 1 PRMS 7: PYM=INT (SXRND) +10’TIRAGE P 
OSITION MAITRE 

180 PXR=30:PYR=12:PPXR=PXR: PPYR=PYR” POSI 

TION DEPART ROBOT ET MISE EN RESERVE POU 
190 PEN 1:LOCATE PXR,PYR:PRINT CHR$(33) : 
PEN 2:LOCATE PXM,FYMIPRINT CHR&(250)°AFF 
ROBOT ET MAITRE’ 

200 IF RG>1 THEN 1000 


210 DATA 24,11,24,12 13 25,13 

6,11,26,13,27,11,27 714 23 11 52h 10 , 23 BE 

2à4,9,23,12,23,14,23,15,24,15,22;,10 18 
2, 2 21.0,22,14,21,14,21:19,71,16, 8: 1,10 
: 10 f219f4 9,16 

20° DATA’ 8° 8 8,9,8,10,8,12,8,14,8,1 1 

6,12,8,12,9,13:9,13,10,14,10,15; 10, 73° 13 
14,14,13,14,13,15,12,15,12,i6 

230 FOR N=1i TO 49:READ I,J:È(I,J 

LILOCATE LIT: PRINT =": NEXT: REPRESENTATIO 

N'ET AFF PILIER 

240 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 

XT'TOP DEPART 


D 
1000 REM BOUCLE DES MOUVEMENTS 
1010 FOR M=1i TO 70°70 MOUVMTS MAXI ADMIS 
POUR ATTEINDRE MAITRE 
1020 REM HEURIST NAV (1) 
1030 IF FXR<>PXM THEN NUME=ABS (PYR-PYM): 
DENO=ABS (PXR-PXM) : IN=NUME/DENCO ELSE 1060 


1040 IF IN<O.S THEN VXR=SGN(PXM-PXR) : VYR 
=0:GOTO 1070 

1050 IF IN>2 THEN VXR=O: VYR=SGN(PYM-PYR) 
: GOTO 1070 

1060 VXR=SGN(PXM-PXR) : VYR=SGN (PYM-PYR) 
1070 TT=O’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN PILIER 

1080 PXR=PPXR+UXR: PYR=PPYREUYR 
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1090 IF PXR>29 THEN 1120 ELSE GOSUB 3000 
TEST HEURT PILIER 

1100 IF OBS=0 THEN 1120 ELSE GOSUB 5000? 
ESSAI NOUVELLE DIRECTION 

1110 GOTO 1080’RECALCUL POSITIO 

1120 GOSUB 4000’TEST RETOUR EN ARRIERE 


Fr 


1150 IF RET=0 THEN 1150 ELSE GOSUB 5000’ 
ESSAI NOUV DIR 

1140 GOTO 1080’RECALCUL NOUV POS 

1150 PEN 3:LOCATE FPXR,PPYR:PRINT CHRS(3 
3) : PEN 1ë ëLÔCATE PXR,PYR: PRINT CHR#(33):5 
OUND 7: PPXR=PXR: PPFYR=PYR 

1160 GURR LR: : VUYR=UYR ? MEMD VITESE POUR 
EVITER PROCHAIN RETOUR EN ARR 

1170 GOSUE, 6000’ TEST MAITRE REJOINT 

1180 NEXT 

1170 _SOÛND 1,500,40,7:GOT0 6030’ PARCOURS 
1200 END 

2000 


REM ZONE DES SOUS-PROGRAMMES 
3000 REM SSPROG HEURT PILIER 


OBS=0 
3020 IF Cire UoRRe THEN RETURN 
3030 OBS=1:TT=TT+ 


RETU EN 

4000 REM SSPROG RETOUR EN ARRIERE 

4010 RET=0’ NEUTRAL RET ARR PRECEDENT 
4020 IF VXRC>-UUXR THEN RETURN ELSE IF V 
YR<)-VUYR THEN RETURN 
4030 IF TT>7 THEN RETURN ELSE :RET=1:TT-= 
TT+1:RETURN 

5000 REM SSPROG ESSAI NOUVELLE DIRECTION 
5010 REM HEURISTIQUE DE DEGAGEMENT (D):T 
IRAGE 1ERE DIRECTION DE DEGAGEMENT PUIS 
EN CAS D’INSUCCES,EXPLORATION ORDONNEE D 
ES AUTRES DIRECTIONS 

5020 IF TT=1 THEN NA S= INT (SXRND+1):SS=IN 
T(2XRND):GOTO 5060 

5030 IF SS=0 THEN HAS=HAS+1::IF HAS<9 TH 
EN 5060 ELSE HAS= HAS-8:GOTO 5060 
5040 HAS=HAS-1:IF HAS>0 THEN 5060 
5050 HAS=HAS+S 
5060 IF HAS=1 THEN 5070 ELSE IF HAS=2 T 
HEN 5080 ELSE IF HAS=3 THEN 5090 ELSE IF 
HAS=4 THEN 5100 ELSE IF HAS=5 THEN 5110 
ELSE IF HAS=6 THEN 5120 ELSE IF HAS=? T 
HEN 5130 ELSE 51 

5070 VXR LIUYR= éoro 5150 

5080 VXR=1:UVYR= à: GOTO 5150 

5090 VRR= I VV REC I 2600 5150 
00 VXR=O:VYR=-1:GOTO 5150 

10 VXR=-1:VYR=-1:GOTO 5150 
20 VXR=-1:UYR=0:GOTO 5150 

30 VXR=-1:UYR=1:GOTO 5150 


mhehete 
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5140 VXR=O:VYR=I 

9150 RETURN 

6000 REM SSFROG MAITRE REJOINT 

6010 IF RSA THEN RETURN ELSE IF PYR 
{>PYM THEN RETUR 

6020 FOR FOIS=1 To 4: SOUND 1,27,5,7:FOR 

AT=1 TO 100:NEXT:NEXT 

6030 FOR AT=1 TO SOO:NEXT:RG=RG+I1:IF RG< 
5 THEN PEN 3:LOCATE to PPYR:PRINT CHR$ 
(33): GOTO 180 ELSE 11 


Pas de commentaires techniques. 
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ÉTAPE E12 
PLUS DE COMPÉTENCE, MOINS DE LIBERTÉ 


Présentation 


L’heuristique de dégagement E du présent exemple se propose d’affi- 
ner l’heuristique D de E9 ; l'expérience aidant, la compétence et l’effi- 
cacité s’améliorent. 

En E9, Roméo laissait au hasard le soin (quelle contradiction des mots!) 
de fixer la direction de la première tentative de dégagement d’un pilier, 
avant de poursuivre ensuite rationnellement l’exploration des autres direc- 
tions en cas d’insuccès. 

Mais il paraît évident, après coup, de faire partir l'exploration 44 pilier 
lui-même, à droite ou à gauche, car c’est ainsi qu’on obtiendra la pre- 
mière position libre la plus proche du but, c’est-à-dire la mieux en har- 
monie avec l’heuristique de navigation. 

Notons qu’en fait d’évidence, il s’agit plutôt d’un théorème dont la 
longue démonstration passe par les déboires des étapes précédentes. Il 
en est de même pour toutes les évidences actuelles de ce monde. On aurait 
certes pu y accéder d’un seul bond, en se privant du plaisir des joyeuses 
escapades buissonnières de Roméo. 

Pour réaliser l’heuristique E, il est nécessaire de repérer puis de mémo- 
iser la direction d’arrivée sur le pilier, ce qui est facile puisqu'on connaît 
les composantes de cette vitesse d'arrivée. Le robot a simplement besoin 
d’un peu plus de mémoire, cette perle si méprisée des purs penseurs : 
sans mémoire, l’ esprit est un superbe moulin broyant sa propre meule. 

C'est ensuite à partir de cette direction que sera entreprise l'explora- 
tion ; le hasard conservant en pâture le sens de rotation. L’interdiction 
de retour en arrière subsiste, car c’est l’un des plus puissants principes 
d'action qu’on puisse imaginer. 

Le résultat en vaut la peine, Roméo rase maintenant les piliers du laby- 
rinthe comme un champion de slalom. Toutefois, face à un mur de piliers 
— ce qui se produit rarement — ce comportement provoque des retours 
en arrière surprenants, heureusement réprimés. On n’assiste plus à cer- 
tains écarts latéraux peu compatibles avec la vénération qu’un robot doit 
potter à son maître. 

La rançon, directement visible sur l’écran, de ce surplus d'intelligence 
est une réduction sensible de la variété des parcours ; le robot n’a plus, 
devant un pilier, que deux issues possibles, l’une immédiatement à droite, 
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l’autre à gauche puisque le dieu des casinos ne détient plus en son pou- 
voir que le sens de rotation. 

Mais rien n'empêche Roméo de se relaxer de temps à autre, de renon- 
cer à penser et de se laisser à nouveau bercer par la délicieuse heuristique 
B, comme font parfois les jeunes filles attendues tenant à conserver pro- 
visoirement l'illusion d’un agaçant libre arbitre. 


Programme 


100 ETAPE Ei2:ROBOT CHERCHANT SON MAITR 

É DANS LABYRINTHE,31 PILIERS, HEURISTIQUE 
DE NAVIGATION (13,HEURISTIQUE DE DEGAGE 

MENT (E),4 PARCOURS SUR MEME TERRAIN 


110 INK O,14:INK 1,7:INK 2,20:INK 3,17:C 
LS:CLEAR 
120 DIM C(31,25)'TABLEAU DES COORDONNEES 
DES CASES DE L'ECRAN SUSCEPTIBLES DE RE 
CEVOIR UN PILIER 

130 SYMBOL AFTER 32:SYMBOL 33,Rk0,&7C,&D6 
,kéC,&38,RFE, &7C,&6C’ DESSIN ROBOT; DESSIN 
MAÏTRE: CODE 250 

140 NOMBRES ALEATOIRES VARIES 

150 RANDOMIZE TIME 

180 RG=1'RANG DU PARCOURS 

170 CLS:H=INT(2XRND):IF H=1 THEN PXM=INT 
(25XRND+6) :PYM=6 ELSE PXM=6:PYM=INT (12%XR 
ND+6)’TIRAGE POSITION MAITRE 

180 PXR=36: PYR=21:PPXR=PXR: PPYR=PYR’ POSI 
TION DEPART ROBOT ET MISE EN RESERVE PU 


190 PEN 1:LOCATE PXR,PYR:PRINT CHRS&(33) : 

PEN 2:LOCATE PXM,PYM!PRINT CHR#(250)°AFF 
ROBOT ET MAITRE 

200 IF RG)1 THEN 1000 

210 FOR N=0 TO 30:TERRS=INKEYS:IF TERRS#K 
5" " THEN 220 ELSE 110 

220 I=INT((33-PXM) XRND) +PXM-1:J=INT((21- 
PYM) /(36-PXM)XCI-PXM))+INT((SXRND-2)X(1- 

PXM) /8) +PYM+1 

230 IF J>PYM-2 THEN 250 

240 J=PYM-1:GO0OTO 270 

250 IF J<>PYM THEN IF J<22 THEN 270 ELSE 
3=71:G0T0 270 

260 IF I<>PXM THEN 270 ELSE J=PYM-1 

270 PEN 1:LOCATE 1I,J:PRINT"=":C(I,J)=1:N 
EXT'AFF ET REPRESENTATION PILIER 

280 SOUND 1,200,80,7:FÜR AT=1 TO 2000:NE 
XT'TOP DEPART 

1000 REM BOUCLE DES MOUVEMENTS 
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1010 FOR M=1i TO 5050 MOUVMTS MAXI ADMIS 
POUR ATTEINDRE MAITRE 

1020 REM HEURIST NAV (1) 

1030 IF PXR<>PXM THEN NUME=ABS (PYR-PYM): 
DENO=ABS (PXR-PXM) : IN=NUME/DENO ELSE 1060 


core ee S THEN VXR=SGN(PXM-PXR) : VYR 
1050 IF IN>2 THEN VXR=O:!VYR=SGN(PYM-PYR) 
: GOTO 1070 

1060 VXR=SGN(PXM-PXR) : VYR=SGN(PYM-PYR) 
1070 TT=O’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN PILIER 

1080 PXR=PPXR+UXR: PYR=PPYREUYR 

1090 IF PXR>31 THEN 1120 ELSE GOSUB 3000 
TEST HEURT PILIER 

LS IF OBS=0 THEN 1110 ELSE 1080’RECALC 


FOS 
1110 IF PAIE THEN 1120 ELSE 1080 
1120 PEN  LOCATE PPXR, PPYR: PRINT FN 
1: LOCATE PXR, PYR: PRINT RONA Te 
OUND 1, 30, 93 7: PPXR= =PXR: PPYR=PY 
1130 VVXR=UXR! VUYR=UYR * MEMO VITESE POUR 
EVITER PROCHAIN RETOUR EN ARR 
1140 GOSUB 4000’TEST HOTTE REJOINT 
1150 FOR de TO 80: Nec XT M 
ne NUE 300,40, F&0TG 4030? PARCOURS 


1170 END 
2000 REM ZONE DES SOUS-PROGRAMMES 
3000 REM SSPROG HEURT PILIER ET/OU RETOU 


3030 IF C(PXR,PYR)=1 THEN 3040 ELSE 3050 
3040 FOR AT=1" TO 100:NEXT:SOUND 1,50,5, 

: PEN 2:LOCATE PXR,PYR: BR INTU Ne FOR AT= 1” 
TO 50: FNEXT: PEN 1:LOCATE PXR,PYR:PRINT"=" 
:0BS=1:GO0T0 3080 
3050 REM TEST RETOUR ARRIERE 
3060 IF VXR<)-VUXR THEN RETURN ELSE IF V 
YR<)-VUYR THEN RETURN 
3070 IF TT)? THEN RETURN ELSE FOR AT=1 T 
O 100:NEXT AT:SOUND 1,20,5,7:PEN 2:LOCAT 
E PXR; PYR: PRINT NE FOB AT= 4 TO 150:NEXT: 
PEN ILOCATE PXR,PYR:PRINT CHRS&(33) :RET= 


3080 TT=TT+I 

3090 REM ESSAI NOUVELLE DIRECTION 

3100 REM HEURISTIUGE DE DEGAGEMENT _(E)':E 

RÉRPÉSRSC ORDONNEE DES AUTRES DIRECIONS 
ANT DU PILIER HEURTE 

3110 PROR AT=i TO 100:NEXT AT:IF TT>1 THE 


O’CAS 2EME PASSAGE ET SUIVANTS 
La VXR=-1 THEN 3150’CAS 1ER ERtPies 


N 32 

3120 

s DETERM 

HEURT 

3130 IF VXR=0O THEN 3180 

3140 IF VXR =1 THEN 3200 

3150 IF VYR=-1 THEN Di=S5:GOTO 3230 
3160 IF VYR=O THEN Di=é6:GOTO 3230 
3170 IF VYR=1 THEN Di=7:GOTO 3230 
3180 IF VYR=-1 THEN Di=4:GOTO 3230 
3190 IF VYR=1 THEN Di1=8:G0OTO 3230 
3200 IF VYR=-1 THEN Di=3:GOTO 3230 
3210 IF VYR=O THEN Di=2:GOTO 3230 
3220 IF VYR=1 THEN Di=i 

ren D=D1'DIRECTION D DEBUT DE L’'EXPLORA 


fo D RONDE ASRANE SENS DE L'EXPL 


3250 REM ÉARÉORAT TON POSITION SUIVANTE 
3260 IF SS=0 THEN a IF D<9 THEN 3280 
ELSE te 32 

3270 D=D-1:1F D>0 THEN 3280 ELSE D=D+8 
3280 TE D=1 THEN 3290 ELSE IF D=2 THEN 3 
300 ELSE IF D=3 THEN 3310 ELSE IF D=4 TH 
EN 3320 ELSE IF D=5 THEN 3330 ELSE IF D= 
6 THEN 3340 ELSE IF D=7 THEN 3350 ELSE 3 


3270 VXR=1:VYR=1: GOTO 3370 

3300 VXR=1:VYR=O:GOTO 3370 

3310 VXR=I1:VYR=-1: GOTO 3370 

3320 VXR=O:UVYR=-1: GOTO 3370 

3330 VXR=-1:VYR=-1:GOTO 3370 

3340 VXR=-1:VYR=O: GOTO 3370 

3350 VXR=-1:VYR=1: GOTO 3370 

3360 VXR=O:VYR=I 

3370 RETURN 

2010 REM SSPROG MAITRE REJOINT 

40 IF PXR<>PXM THEN RETURN ELSE IF PYR 
eSBYM THEN ar 

4020 FOR FOIS=1 TO 4: UE 1,2759:7:FOR 

AT=1 TO 100: NEXT:N NEX 

4030 FOR AT=1 TO 800: 2NEXT: RG=RG+1:1IF RGK 
5 THEN PEN 3S:LOCATE PPXR,PPYR: PRINT CHR$ 
(33): GOTO 180 ELSE 110 


Commentaires techniques 


e Les trois sous-programmes de E9 (heurt pilier, retour en arrière et essai 
nouvelle direction) ont été réunis en un seul. 


° Après détection d’un pilier au début de ce sous-programme, le repé- 
rage de la direction d’arrivée se fait à l’aide du paramètre D1 dont 
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la valeur (de 1 à 8) est déterminée en fonction des valeurs VXR et VYR 
On 


de la vitesse d’arrivée, suivant la même correspondance qu’en E8. 
obtient ainsi huit directions possibles : 


VXR = let VYR = 
VXR = Let VYR = 
VXR = Let VYR = 
VXR = Oet VYR = 


1, DI 
0, DI 
-1, DI 
-1, Di 


il 


1 VX 
2 VX 
3 VX 
4 VX 


R 
R 
R 
R 


l 


- let VYR 
- 1 et VYR 
- let VYR 

0 et VYR 


-1, DI 
0, DI 
1, DI 
1, DI 


WOONO 
D —1 LA 


Dans l’ordre, ces valeurs de D1 correspondent respectivement au 
sud-est, à l’est, au nord-est, au nord, au nord-ouest, à l’ouest, au sud- 
ouest et au sud. C’est cette valeur D1 qui remplace le paramètre HAS 


tiré au sort de E9. 


e Le sens d'exploration SS reste tiré au hasard comme dans E9. 
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ÉTAPE E13 
LES FONCTIONS D'ÉVALUATION 


Présentation 


Gravissons l’ultime marche et examinons ce que peut être une certaine 
heuristique de dégagement F meilleure que la précédente. Sans doute 
plusieurs lecteurs l’auront-ils déjà débusquée. 

Nous accéderons plus loin, en E27 et E28, à d’autres heuristiques res- 
sortissant à un concept différent. 

Mais, dans son mode de pensée actuel, au premier degré de ses per- 
ceptions sensorielles, Roméo arrive ici au bout de ses possibilités. Toute 
fantaisie va lui être refusée , sa pensée envahissante agissant maintenant 
en dictatrice. 

Au déterminisme bêtifiant de la première heuristique de dégagement 
A va se substituer un autre déterminisme triomphant dont le noyautage 
inexorable s’est opéré sous nos yeux au cours des cinq promenades, de 
plus en plus sages, des programmes précédents. L'on choisira parmi ces 
modes selon son cœur ou selon sa tête, un peu comme entre Vercingéto- 
rix et César, 

Au présent stade donc, le robot retire au hasard son dernier droit, celui 
de choisir le sens d’exploration de l’heuristique E, et estime qu’il est assez 
grand pour effectuer les deux explorations puis choisir la meilleure des 
deux positions ainsi obtenues. Ï commence donc par simuler les deux 
explorations, inscrit un point d'interrogation sur chacune des deux posi- 
tions ainsi repérées, évalue ces deux positions et adopte la meilleure. 

L'outil utilisé pour soupeser la valeur des positions s’appelle une fonc- 
tion d'évaluation. La programmation du jeu d’échecs, par exemple, a 
donné lieu à l'invention d’une foule de fonctions d'évaluation, la nôtre 
possède une double simplicité : 


e l'évaluation se fait sur le pas en cours, Z /4 profondeur zéro, sans s’occu- 
per des aléas ultérieurs éventuels (piliers) ; 


e l'évaluation consiste simplement à apprécier la distance de la position 
au maître, et à choisir la plus courte ou, en cas d’égalité, la dernière 
calculée. 


3. À un détail près : si deux solutions s'avèrent équivalentes, il adoptera la dernière examinée. 
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Mais il est essentiel de noter que cette ‘‘distance’” robot-maître est défi- 
nie d’une manière spéciale, adaptée au problème à résoudre et qui ne 
correspond pas forcément à la définition mathématique classique. C’est 
en quelque sorte une #stance heuristique, analogue à celle que peut appré- 
cier d’un coup d’œil le joueur de pétanque en tenant compte des acci- 
dents du terrain. 

Dans le cas présent, on a choisi la définition la plus naturelle : le nombre 
de pas qui séparent le robot de son maître, en supposant qu'il n’y ait 
plus ensuite de piliers sur le trajet. 

Il est facile de voir, sur la figure de l’étape E4, qu'il s’agit, pour une 
position donnée du robot, de la plus grande des deux distances décomp- 
tées verticalement ou horizontalement. Par exemple, sur la figure en ques- 
tion, la distance horizontale est 17, la distance verticale est 5, il faut donc 
que le robot fasse dans le meilleur des cas 17 pas (horizontaux ou en biais) 
pour rejoindre son maître. 

Nous avions d’ailleurs remarqué que ce nombre de pas nécessaires est 
identique pour plusieurs heuristiques de navigation possibles et qu'il cons- 
titue bien un nombre caractéristique de la position. Le robot est donc 
censé posséder une vue qui lui permette d’apprécier ce genre de distance 
et un intellect pour procéder aux comparaisons. 

On aurait certes pu choisir, pour évaluer la position, la distance au 
sens commun du terme, c’est-à-dire la longueur de la droite joignant la 
position au maître, calculable à l’aide du théorème de Pythagore, mais 
cette manière, outre son formalisme et sa lourdeur, n’eût pas été adap- 
tée au problème posé. 

Nous verrons en E30 une fonction d'évaluation des distances différem- 
ment exprimée, tenant compte des particularités d’une autre situation. 

Ces façons de procéder sont parfaitement logiques puisqu’en fait on 
a à évaluer des s’#uations globales, avec leurs aspects quantitatifs et qua- 
litatifs parfois complexes, très difficiles à exprimer. 

Une fonction d'évaluation peut ainsi contenir de nombreux paramè- 
tres, à l’intérieur de structures plus ou moins bizarres, linéaires ou non, 
affectés de coefficients empiriques rationnellement inexplicables, et dont 
le programmeur peut faire varier le dosage en fonction. de son talent. 

Nous verrons l’une de ces formules magiques au sein du programme 
E27. Elles élèvent en quelque sorte les mathématiques au vrai niveau que 
leur conférait Évariste Galois, celui des idées, bien au-delà des calculs. 

L'efficacité de l’heuristique F apparaît à l’écran, mais d’une manière 
relativement discrète par rapport à l’heuristique E. Il faut peut-être y voir 
l'effet logarithmique de la relation cause-effet, déjà signalé en ES à pro- 
pos des heuristiques de navigation 1 et 2, ou plutôt le caractère appa- 
remment anodin et naturel des actes mûrement réfléchis. 
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Programme 


100 ’ETAPE E13:ROBOT CHERCHANT SON MAITR 

E DANS LABYRINTHE,31 PILIERS,HEURISTIQUE 
DE NAVIGATION (1} HEURISTIG E DE DEGAGE 

MENT (F),4 PARCOURS SUR MEME TERRAIN 


L10 INK O,22:INK 1,1:INK 2,6:INK 3,14:CL 
120 DIM C(32,25)'TABLEAU DES COORDONNEES 
DES CASES DE L'ECRAN SUSCEPTIBLES DE RE 

CEVOIR UN PILIER 

180 SYMBOL AFTER 32:SYMBOL 33,&0,&7C,&kDé 

L38,8FE,&7C,&6C* DESSIN ROBOT; DESSIN 

ATTRE: ÉODE 250 

140 NOMBRES ALEATOIRES VARIES 

150 RANDOMIZE TIME 

160 RG=1’RANG DU PARCOURS 

170 CLS:H=INT(ZXRND):IF H=1 THEN PXM=INT 

(25XRND+6) :PYM=6 ELSE PXM=6:PYM=INT (12XR 

ND+6)’TIRAGE POSITION MAITRE 

180 PXR=36: PYR=21: PPXR=PXR: PPYR=PYR? POSI 

TION DEPART ROBOT ET MISE EN RESERVE POU 


190 PEN 1:LOCATE PXR,PYR:PRINT CHR$(33): 
PEN _2:LOCATE Pas PYM!PRINT CHRS# (250) * AFF 
ROBOT ET MAI 

200 IF RG>1 THEN 1000 

210 FOR N=0O TO 30:TERRS=INKEYS: IF TERR#K< 
>" " THEN 220 ELSE 110 


220 I=INT((33-PXM) XRND) +PXM-1:J=INT((21- 
BEM) ? LS0 PME CI CPR) D # INT CCSERND 2) #11 = 
PXM)/8) +PYM+1 

230 IF J>PYM-2 THEN 250 

240 J=PYM-1:GOTO0 270 


250 IF J<>PYM THEN IF J<22 THEN 270 ELSE 
J=21:GOT0 270 

260 IF IC>PXM THEN 270 ELSE J=PYM- 

270 PEN 1:LOCATE I,J:PRINT"=":C(I, Fan 

EXT'AFF ET REPRESENTATION PILÏER 

280 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 

XT'TOP DEPART 
1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=1 TO 50’50 MOUVMTS MAXI ADMIS 
POUR ATTEINDRE MAITRE 

1020 REM HEURIST NAV (1) 

1030 IF PXR<>PXM THEN NUME=ABS (PYR-PYM) : 
DENO=ABS (PXR-PXM) : IN=NUME/DENO ELSE 1060 


1040 IF IN<O.S THEN VXR=SGN(PXM-PXR) : VYR 
=0:GOTO 1070 

1050 IF IN>2 THEN VXR=O:VYR=SGN(PYM-PYR) 
: GOTO 1070 

1060 VXR=SGN(PXM-PXR) : VYR=SGN (PYM-PYR) 
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1070 TT=O’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN PILIER 
1080 PXR=FPXR+UXR: PYR=PPYR+UYR 
1090 IF PXR>32 THEN 1260 ELSE GOSUB 3000 
TEST HEURT PILIER 
Den OBS=0 THEN 1110 ELSE 1080’RECALC 
1110 IF RET=0 THEN 1120 ELSE 1080 
20 IF M<>MPI THEN 1260 
O REM HEURIST DE DEGT (F):ESSAI AUTRE 
NS DÉC En 
EE ESS=1 THEN 1180 ELSE PEN 2:LOCAT 
PYR: PRINT 20 : : PRR1ZPXR: PYRI=PYR: VX 
VRB : VYRI=VYR'AFF ET MEMO 1ERE POS 
O FOR AT=1 TO 100:NEXT:SSS=SS:IF SSS= 
OR ELSE SS=1’INVERSION SENS DE 
O TT=2:ESS=i:D=D1:GOSUB 3250 
O GOTO 1080? DE ÉÉTNEE POS 
O ESS=0:MPI=O’REINIT ESS ET MPI 
O0 PEN 2: L'OCATE PXR, PYR:PRINT"?"?AFF 2 


POS 
FOR AT=1 TO 300: NEXT 

REM HEUR DE DEGT (F):CHOIX MEILLEUR 
SITION,PLUS COURTE DES 2 DISTANCES D 
ET DIST2 AU MAITRE 

HOR1=ABS (PXM-PXR1) : VERTI=ABS (PYM-PY 
IF _HOR1 VERT THEN DISTI=HORI ELSE 
HOR2=ABS (PXM-PXR) : VERT2=ABS (PYM-PYR 
F_HOR2)VERT2 THEN DIST2=HOR? ELSE DIS 
1240 IF DIST2(=DISTI THEN 1250 ELSE LOCA 
TE PXR,PYR:PRINT" ":PXR=PXRI:PYR=PYRI: VX 
R=UXR1 UYR=UYRI:GOTO 1260’1ERE POS CHOIS 


IE 
1250 LOCATE PXR1,PYRI1: PRINT" "?’2EME POS 
CHOISIE 


1260 PEN 3:LOCATE PPXR, PPYR: PRINT PE 
3):PEN 1:LOCATE PXR,PYR:PRINT CHRS (33) : 
GUND 1,80, 95 7: PPXR= =PXR: PPYR=PYR: VUXR= VER 
1270 GOSUB 4000'TEST MAITRE RASE 

1280 FOR N=1 TO SO:NEXT:NEXT M 

rs ES UND 1,5300,40,7:GOTO 3030 PARCOURS 


1300 END 

2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG HEURT PILIER ET/OU RETOU 
R EN ARRIERE 

3010 OBS=0:RET=0O 

3020 REM TEST PILIER 

3030 IF C(PXR,PYR)=1 THEN 3040 ELSE 3050 


A0 008. S000PEOSX 020 


MN NNZmebmmmeO bebe  Hefjjiehe 
0-00 
LEZ EL] 


JO DemMeeMemen Ter UNE br 
no 


Ne N 
0 
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3040 FOR AT=1 TO 100:NEXT:SOUND 1,50,5,7 
: PEN 2: L OCATE PXR,PYR: PRINT'X":FOR AT=1 
TO SO: NEXT:PEN 1:LOCATE PXR, PYR: PRINT =" 

: OBS=1:GOTO 3080 

3050 REM TEST RETOUR ARRIERE 

3060 IF VXR<>-VUXR THEN RETURN ELSE IF V 
YR£I-VUYR THEN RETURN 

3070 IF TT>7 THEN RETURN ELSE FOR AT=1 T 
O 100:NEXT AT:SOUND 1,20,5,7:PEN 2:LOCAT 
E_PXR,PYR: PRINT"X":FOR Af=1 TO 150:NEXT: 

Ha 3! LOCÂTE PXR, PYR: PRINT cHRS 133) :RÊTS 


3080 FOR AT=1 TO 1S5O:NEXT:TT=TT+1: MPI=M? 

MEMCO NO BOUCLE 

3090 REM ESSAI NOUVELLE DIRECTION 

3100 REM HEURISTIQUE DE DEGAGEMENT (F):E 

XPLORATION ORDONNEE DES DIRECTIONS EN P 
ARTANT DU PILIER HEURTE 

3110 FOR AT=1 TO 10O0:NEXT AT:IF Ar THE 
N 3250’CAS 2ÈME PASSAGE ET SUIVANTS 

3120 IF VXR=-1 THEN 3150’CAS ÎER PASSAGE 
; DETERMINATION DE LA DIRECTION D1 DU 1ER 


* HEURT 

3130 IF vor O THEN ee 

3140 IF VXR =1 THEN 3200 

3150 IF VYR==I THEN D1= 9: GOTO 3230 
3160 IF VYR=O THEN D1=6:GOTO 3230 
3170 IF VYR=1 THEN D1=7:GOTO 3230 
3180 IF VYR=-1 THEN Di=4:G0OTO 3230 
3190 IF VYR=i THEN D1=8:GO0OT0 3230 
3200 IF VYR=-1 THEN Di=3:GOTO 3230 
3210 IF VYR=O THEN ie + GOTO 3230 
3220 IF VYR=1 THEN 

SrES D=D1' DIRECTION ?D "DEBUT DE L'’EXPLORA 


TION 

RSI INT (2XRND) ’TIRAGE SENS DE L’EXPL 
3250 REM EXPLORATION POSITION SUIVANTE 
3260 IF SS=0 THEN D=D+1i:1IF D<9 THEN 3280 
ELSE D=D-8:GOTO 3280 

3270 D=D-1:1IF D>0 THEN 3280 ELSE D=D+8 
3280 IF D=1 THEN 3290 ELSE IF D=2 THEN 3 
300 ELSE IF D=3 THEN 3310 ELSE IF D=4 TH 
EN 3320 ELSE IF D=5 THEN 3330 ELSE IF D= 
6 + El 3340 ELSE IF D=7 THEN 3350 ELSE 3 


3290 VXR=I1:VYR=1:GOTO 3370 
3300 VXR=1:VYR=O: GOTO 3370 
3310 VXR=I:VYR=-1:GOTO 3370 
3320 VXR=O:VYR=-1: GOTO 3370 
3330 VXR=-1: VYR=-1:GOTO 3370 
3340 VXR=-1:VYR=O:GOTO 3370 
3350 VXR=-1:VYR=1:GOTO 3370 
3360 VXR=O: VYR=I 


—_ 93 — 


3370 RETURN 

4000 REM SSPROG MAITRE REJOINT 

4010 IF PXR<>PXM THEN RETURN ELSE IF PYR 
<>PYM THEN RETURN 

ren FOR FOIS=1 TO 4:SOUND 1,27,5,7:FOR 

AT=1 TO 100:NEXT:NEXT 

2030 FOR AT=1 TO SOO:NEXT:RG=RG+1:1IF RG< 
9 THEN PEN 3:LOCATE PPXR, PPYR: PRINT cHRS 
(33): GOTO 180 ELSE 110 


Commentaires techniques 


Au passage dans le sous-programme ‘‘heurt pilier ou retour en arrière”, 
chaque fois qu’un empêchement (pilier ou retour en arrière) entrave 
la marche du robot, le numéro de la boucle en cours (MPI) est mémo- 
risé et une nouvelle direction est tentée dans un certain sens d’explo- 
ration SS tiré au sort, jusqu’à trouver une position libre. 


Dans une telle boucle (pour laquelle M = MPI), le programme pro- 
voque alors une seconde exploration dans le sens inverse. Les deux explo- 
rations sont conduites sous l’égide du paramètre ESS qui vaut 0 pour 
le premier sens puis 1 pour le second. Les deux positions possibles sont 
mémorisées et visualisées au moyen d’un point d'interrogation. 


Le programme calcule les deux distances DIST1 et DIST2, chacune étant 
la plus élevée des distances horizontale et verticale HOR1 et VERT1, 
puis HOR2 et VERT2. 


Les valeurs DIST1 et DIST2 sont alors comparées, et la plus courte est 
choisie. 


Chaque fois, la vitesse du robot est mémorisée (VVXR, VVYR) en vue 
d'interdire un prochain retour en arrière éventuel. 


Quatre parcours successifs sont effectués sur le même terrain et per- 
mettent de déceler encore un léger indéterminisme ; en effet, si les dis- 
tances DIST1 et DIST2 sont égales, c’est la seconde position explorée 
qui est adoptée, et cela peut varier d’un parcours à l’autre puisque 
le premier sens de rotation est tiré au hasard. 
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ÉTAPE E14 
SILENCE, ON TOURNE 


Présentation 


Il s’agit du même programme que E13, mais avec suppression du dis- 
positif audiovisuel permettant de suivre les opérations mentales du robot, 
comme E11 vis-à-vis de E10. 

Il n’est pas facile, pour le spectateur non averti, de deviner alors quelle 
est la tactique du robot. Il peut seulement en remarquer l'efficacité, la 
sûreté, mises en relief par le léger temps de réflexion qui marque chaque 
contournement de pilier. 

Au plan philosophique, on peut se demander pour E13 et E14 ce qui 
autorise à croire en l'efficacité de cette heuristique F. En effet, elle ne 
tient aucun compte de la rencontre ultérieure possible (et même proba- 
ble) d’autres piliers, peut-être plus nombreux du côté de la position choisie 
que du côté de la position dédaignée. 

La réponse est claire : comme Roméo procède ainsi devant chaque pilier 
rencontré, la méthode est ez moyenne meilleure que celle qui consiste- 
rait à prendre la première position venue. Le lecteur pourra s’en convaincre 
concrètement en mettant dans un même programme les deux heuristi- 
ques E et F et en comparant les nombres de pas moyens nécessaires à 
l'exécution d’un même parcours. 

Bien entendu, pour faire mieux, il faudrait voir un peu plus loin. 
mais n’anticipons pas. 


Programme 


100 ’ETAPE E14:COMME E13 SANS SONO NI VI 
SUALISATION DES HEURISTIQUES 

110 INK O,22:INK 1,1:INK 2,6:INK 3,14:CL 
S: CLEAR 

120 DIM C(32,25)’TABLEAU DES COORDONNEES 
DES CASES DE L'ECRAN SUSCEPTIBLES DE RE 
CEVOIR UN PILIER 

130 SYMBOL AFTER 32:SYMBOL 33,&0,&7C,&D6 
kéC,R38,RFE, &7C, &6C’ DESSIN ROBOT; DESSIN 
MAITRE : ÉODE 250 

140 NOMBRES ALEATOIRES VARIES 
150 RANDOMIZE TIME 

160 RG=1'RANG DU PARCOURS 
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170 CLS:H= RUES DRE ee THEN PXM=INT 
(25XRND+6) : PYM=é SE PXM=é:PYM=INT(12XR 
ND+6) ’TIRAGE POSITION MAIT RÈ 

180 PXR=36: PYR=21:PPXR=PXR: PPYR=PYR? POSI 
D ONASEPE ROBOT ET MISE EN RESERVE POU 


190 PEN 1:LOCATE PXR,PYR:PRINT CHR$(33): 
PEN 2:LOCATE PXxM, PYM!PRINT CHRS# (250) ° AFF 
ROBOT ET MAITRE 
200 IF RG>1 THEN 1000 
210 FOR N=0 TO 30: is INKEYS: IF TERR#< 
>" " THEN 220 ELSE 110 
220 I=INT((33-PXM) XRND) +PXM- =INT((21- 
BYM) LOL PXMD ECC PRN) D INT C (OXRNDO 2) #1 
PXM) /8) +PYM+1 
230 IF J>PYM-2 THEN 250 
240 J=PYM-1:GOTO 270 
250 IF J{>PYM THEN IF J<22 THEN 270 ELSE 
J=21:GOTO0O 270 
260 IF I<>PXM THEN Ce ELSE J=PYM-1 
270 PEN 1:LOCATE I,J:PRINT"'=":C(I,J)=1:N 
EXT’'AFF ET REPRESENTAT 1 ON PILIER 
280 SOUND 1,200,80,7:FOR AT=1 TO 2OO00:NE 
foe TOP DEPART 
1000 REM BOUCLE DES MOUVEMENTS 
1010 FOR M=1i TO 50750 MOUVMTS MAXI ADMIS 
POUR ATTEINDRE MAITRE 
ME REM HEURIST NAV (1) 
30 IF PXR<>PXM THEN NUME=ABS (PYR-PYM): 
DENO= ABS (PXR-PXM) : IN=NUME/DENO ELSE 1060 


1040 IF IN<O.S THEN VXR=SGN(PXM-PXR) : VYR 
=0:GOTO 1070 

EU E 0e THEN VXR=O:VYR=SGN(PYM-PYR) 
1060 VERS SGN(PXM-PXR) : VYR=SGN (PYM-PYR) 
1070 TT=O’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN PILIER 

1080 PXR=PPXR+UXR: PYR=PPYR+UYR 

1090 IF PXR>32 THEN 1240 ELSE GOSUB 3000 
TEST HEURT PILIER 

Dr bc OBS=0 THEN 1110 ELSE 1080’RECALC 
1110 IF RET=0 THEN 1120 ARE 1080 


1120 IF M<>MPI THEN 124 

1130 REM HEURIST DE DÉGT (F):ESSAI AUTRE 
SENS D’EXPLORATION 

1140 IF ESS=1i THEN 1180 ELSE PXRI=PXR:PY 
Pc R:VXRI=VXR: VYRI=VYR'AFF ET MEMO 1ER 
1150 SSS=SS:1IF SSS=i HR Ne O0 ELSE SS=1 
* INVERSION SENS DE ROTAT 

1160 TT=2:ESS=1:D=D1: COQUE 3250 
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O GOTO 1080’RECALCUL POS 
O0 ESS=0:MPI=O0’REINIT ESS ET MPI 

Ô REM HEUR DE DEGT (F):CHOIX MEILLEUR 
OSITION,PLUS COURTE DES 2 DISTANCES D 
ET DIST2 AU MAITRE 

HOR1=ABS (PXM-PXR1) : VERTI=ABS (PYM-PY 
î IP HOR1DVERTI THEN DISTI=HOR1 ELSE 
O HOR?2=ABS (FXM-PXR) : VERTZ2=ABS (PYM-PYR 
F HOR2>VERT2 THEN DIST2=HOR? ELSE DIS 
U RT2 


230 VUXR=UXR: VUYR=UYR’ 2EME POS CHOISIE 
1240 PEN 3:LOCATE PPXR,PPYR:PRINT CHRS (3 
3):PEN 1:LOCATE PXR,PYR:PRINT CHR$(33):5S 
OUND 1,30,5,7:PPXR=PXR: PPYR=PYR 

1250 GÜSUËB 4000’ TEST MAITRE REJOINT 

1260 NEXT M 

1270 _SOUND 1,500,40,7:GOTO 4030’ PARCOURS 


1280 END 

2000 REM ZONE DES SOUS-FROGRAMMES 

3000 REM SSPROG HEURT PILIER ET/OU RETOU 
R EN ARRIERE 

3010 OBS=0:RET=0 

3020 REM TEST PILIER 

3030 IF C(PXR,PYR)=1 THEN 3040 ELSE 3050 
3040 üBS=1:GOTO 3080 

3050 REM TEST RETOUR ARRIERE 

3060 IF VXR<>-VVXR THEN RETURN ELSE IF V 
YR<>-VUYR THEN RETURN 

3070 IF TT>7 THEN RETURN ELSE RET=1 

3080 TI=TT+1:MPI=M’MEMO NO BOUCLE 

3090 REM ESSAI NOUVELLE DIRECTION 

3100 REM HEURISTIQUE DE DEGAGEMENT (F):E 
XPLORATION ORDONNEE DES DIRECTIONS EN P 
ARTANT DU PILIER HEURTE 

3110 IF TT>1 THEN 3250’CAS 2EME PASSAGE 
ET SUIVANTS 

3120 IF VXR=-1 THEN 3150’'CAS 1ER PASSAGE 
DETERMINATION DE LA DIRECTION Di DU 1ER 


* HEURT 

3130 IF VXR=0 THEN 3180 

3140 IF VXR =1 THEN 3200 

3150 IF VYR=-1 THEN Di=5:GOTO 3230 
3160 IF VYR=O THEN Di=6:GOTO 3230 
3170 IF VYR=1 THEN Di=7:GOTO 3230 
3180 IF VYR=-1 THEN Di=4:GOTO 3230 
3190 IF VYR=1 THEN D1=8:G0TO 3230 
3200 IF VYR=-1 THEN Di=3:GOTO 3230 
3210 IF VYR=0O THEN D1=2:G0TO 3230 
3220 IF VYR=1 THEN Di=1 
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7 D=D1’DIRECTION D DEBUT DE L’EXPLORA 


ON 
3240 SS=INT(2XRND) ’TIRAGE SENS DE L’EXPL 
ORATION 
3250 REM EXPLORATION POSITION SUIVANTE 
3260 IF SS=0 THEN D=D+1:1F D<9 THEN 3280 
ELSE D=D-8:GOT0 3280 
3270 D=D-1:1F D>0 THEN 3280 ELSE D=D+8 
3280 IF D=1 THEN 3290 ELSE IF D=2 THEN 3 
300 ELSE IF D=3 THEN 3310 ELSE IF D=4 TH 
EN 3320 ELSE IF D=S5 THEN 3330 ELSE IF D= 
6 THEN 3340 ELSE IF D=7 THEN 3350 ELSE 3 


3290 VXR=1: VYR=1: GOTO 3370 

3300 VXR=1:VYR=O0O:GOTO 3370 

3310 VXR=1: VYR=-1: GOTO 3370 

3320 VXR=O: VYR=-1: GOTO 3370 

3330 VXR=-1: VYR=-1: GOTO 3370 

334Q VXR=-1: VYR=O:GOTO 3370 

3350 VXR=-1: VYR=1: GOTO 3370 

3360 VXR=O: VYR=1 

3370 RETURN 

4000 REM SSPROG MAITRE REJOINT 

4010 IF PXR<>PXM THEN RETURN ELSE IF PYR 
{>PYM_ THEN RETURN 

4020 FOR FOIS=1 TO 4:SOUND 1,27,5,7:FOR 

AT=1. TO 100: NEXT:NEXT 

4030 FOR AT=1i TO SO0:NEXT:RG=RG+I1: IF RG< 
S THEN PEN 3:LOCATE PPXR, PPYR: PRINT CHR#& 
(33): GOTO 180 ELSE 110 


Pas de commentaires techniques. 
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ÉTAPE E15 


DE LA RIGUEUR DANS LA TACTIQUE, 
DU FLOU“ DANS LA STRATÉGIE 


Présentation 


L'abandon, en E13-E14, de toute fantaisie au profit de l'efficacité est 
peu conforme au caractère de Roméo qui tient beaucoup à conserver un 
certain libre arbitre et à se promener en dehors des sentiers battus du 
labyrinthe. 

C'est sous l’aiguillon de cette regrettable indiscipline qu’il a alors une 
idée véritablement géniale. Il a constaté, de E7 à E13, la corrélation étroite 
entre la qualité des heuristiques de dégagement et celle de ses presta- 
tions, donc rien à redire de ce côté. 

Mais il s’est souvenu aussi que la ravigation générale hors piliers pou- 
vait supporter sans inconvénient (nombre de pas nécessaires) quelques 
accommodements, tel le passage de l’heuristique 1 à l’heuristique 2. 

Il a en conséquence décidé de s’offrir une petite heuristique de navi- 
gation spécialement adaptée, baptisée 3, et qui est une heuristique 1 
‘‘améliorée’”. L'amélioration consiste à y introduire de la fantaisie à cha- 
que pas à l’aide du générateur de hasard. Ce qui prouve que, si le soldat 
doit rester pur, le général peut se permettre quelques écarts. 

Ce résultat est obtenu en remplaçant les valeurs habituelles des compo- 
santes VXR et VYR de l’heuristique 1 par des valeurs floues qui oscillent 
aléatoirement autour des précédentes. 

Il y a une infinité de manières de doser ce flou. On peut le mettre 
dans le paramètre IN défini en E4 (inclinaison de la direction robot-maître) 
en écrivant par exemple : 


IN = NUME/DENO + INT(3 x RND -1) 


auquel cas IN prendra soit sa vraie valeur NUME/DENO, soit cette valeur 
augmentée ou diminuée de 1. 

On peut aussi, comme proposé dans le programme démonstratif ci- 
après, introduire la zizanie directement dans les composantes de la vitesse. 
Deux conséquences, l’une évidente, l’autre étrange : 


4. Ce flou n’a rien à voir avec la théorie des ensembles flous de L. Zadeh. 
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e Roméo redevient soudainement joyeux et semble avoir acquis un sens 
supplémentaire, le goût des bons vins; 


e Il arrive aussi sûrement à destination que s’il était à jeun, et presque 
aussi rapidement. Les piliers semblent le ramener à la raison, ce qui 
est normal puisque l’heuristique de dégagement F reste intacte. 


Il lui est arrivé malgré tout une fois ou deux de sortir de l’écran à sa 
partie inférieure, terrassé par le flou. 


Programme 


O ‘ETAPE E15:COMME Ei4,AVEC HEURISTIQUE 
3) : INTRODUCTION D’UNE CERTAINE MARGE D 

HASARD DANS L'HEURISTIQUE (1) 

: INK O0,22:INK 1,1:INK 2,6:INK 3,14:CL 

O 


AR 

DIM C(32,25)7TABLEAU DES COORDONNEES 
DES CASES DÉ L'ECRAN SUSCEPTIBLES DE RE 
EVOIR UN PIL 


1ER 

150 SYMBOL AFTER 32:SYMBOL 33,8k0,&7C,&D6 
RéC,&38,RFE, W7C, &6C’ DESSIN ROBOT; DESSIN 
"MAITRE: ÉODE 2 

140 * NOMBRES ALÉATOIRES VARIES 


1 
E 
1 
S: 
1 
C 


s 

170 CLS:H=INT(2XRND):IF H=1 THEN PXM=INT 
(25XRND+6) :PYM=6 ELSE PXM=6:PYM=INT (12XR 

ND+6)’TIRAGE POSITION MAITRE 

180 PXR=36: PYR=21:PPXR=PXR: PPYR=PYR’ POSI 
TION DE DEPART ROBOT ET MISE EN RESERVE POU 
150 PEN 1:LOCATE FXR,PYR:PRINT CHR (33) : 
PEN 2:LOCATE PXM,PYM:PRINT CHR$ (250) AFF 
RDBO+ ET MAITRE’ 

200 IF RG>1 THEN 1000 

210 FOR N=0 TO 30:TERRS=INKEYS:1F TERR#& 
$" " THEN 220 ELSE 110 

220 I=INT((33-PXM) XRND) +PXM-1:J=INT((21- 
PYM)/(36-PXM)X(1I- RD NE CS ERNDS 2)#(I- 
PXM) /8) +PYM+i 

230 IF J)PYM=2 THEN 250 

240 J=PYM-1: GôTU 27 

250 1F J<>PYM THEN ÊE J<22 THEN 270 ELSE 

=21:G0T0 270 

22071 TCSPKM THEN 270 ELSE J=PYM-1 

270 PEN 1:LOCATE 1,J:PRINT"=":C(I,J)=1:N 
EXT'AFF ET REPRÉSENTATION PILIER 

280 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
KT'TOP DEPART 
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1000 REM BOUCLE or MOUVEMENTS 

1010 FOR M=1 TO 50 MOUVMTS MAXI ADMIS 
POUR ATTEINDRE MAIT RE 

1020 REM HEURIST NAV (3) 

1030 IF PXR<>PXM THEN NUME=ABS(PYR-PYM): 
DENO=ABS (PXR-PXM) : IN=NUME/DENQO ELSE 1060 
1040 IF IN<O.S THEN VXR=SGN(PXM-PXR) : VYR 

=INT(SXRND-1)::GOT0 1070 

1050 IF IN>2 THEN VXR=INT(SXRND-1)::VYR= 

SGN(PYM-PYR) : GOTO 1070 

1060 VXR=SGN(PXM-PXR) % VYR=SGN (PYM-PYR) 
1070 TT=O’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 

RE APRES AVOIR HEURTE UN PILIER 

1080 PXR=PPXR+UXR: PYR=PPYREUYR 

1090 IF PXR>32 THEN 1240 ELSE GOSUB 2000 
TEST HEURT PILIER 

dt 08 OBS=0 THEN 1110 ELSE 1080’RECALC 
1110 IF RET=0O THEN 1120 ELSE 1080 

1120 IF MS>MPI THEN 1240 

130 BEN HEURIST PE DEGT (F):ESSAI AUTRE 

SENS D’EXPLORATIO 

140 1F ESS=1 THEN. 1180 ELSE PXR1=PXR:PY 

PYR: VXRI=VXRE VYRIZ=VYR'AFF ET MEMO 1ER 


6 

O SSS=SS:IF SSS=1 THEN S5S=0 ELSE SS=1 

VERSION SENS DE ROTATION 
TT=2:ESS=1:D=D1:GOSUB 3250 

Ô GuTO: 1080! RÉCALEUL POS 

O0 ESS=0:MPI=0’REINIT ESS ET MPI 

O REM HEUR DE DEGT (F):CHOIX MEILLEUR 

OSITION,PLUS COURTE DES 2 DISTANCES D 
ET DIST2 AU MAITRE 

HOR1=ABS (PXM-PXR1 ) : VERTI=ABS (PYM-PY 

:1F HORLOVERTI THEN DISTI=HORI ELSE 

HOR2=ABS (PXM-PXR) : VERT2=ABS (PYM-PYR 

HOR2>VERT2 THEN DIST2=HOR2 ELSE DIS 


T2 
IF DIST2<=DISTI THEN 1230 ELSE PXR= 
1:PYR=PYR1 : VXR=UXRI : VYR=UYR1:GOTO 124 
1ERE POS CHOISIE 
230 VUXR=UXR: VUYR=UYR’ 2EME POS CHOISIE 
1240 PEN 3:LOCATE PPXR,PPYR:PRINT CHRS&( 
3) : PEN SLOCATE PXR,PYR:PRINT CHR$(33): 
OUND : PPXR=PXR: PPYR=PYR 
1250 ns 36807 TEST MAITRE REJOINT 
1260 NEXT 
1270 _SOÛND 1,500,40,7:GOTO 4030’ PARCOURS 


1280 END 
2000 REM ZONE DES SOUS-PROGRAMMES 
3000 REM SSPROG HEURT PILIER ET/OU RETOU 


MDr- + 


SXNNeNMeNU mme M 
On 


TN Im=N-O1D0DNRZUT I 
une [e) [m) 


RO H- ROUTE Mmembehre she 


3 
s 
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R EN ARRIERE 
5020 REN TÉST PILIER 

3080 IF C(PXR PYR)=1 THEN 3040 ELSE 3050 
3040 0BS=1:G0T0 

3050 REM EST RETOUR ARRIERE 

3060 IF VXR<>-VUXR THEN RETURN ELSE IF V 
YR<)-VUYR THEN RETURN 

3070 IF TT)? THEN RETURN ELSE RET=i 

3080 TT=TT+1:MPI=M’MEMO NO BOUCLE 

3090 REM ESSAI NOUVELLE DIRECTION 

3100 REM HEURISTIQUE DE DEGAGEMENT (F):E 
XPLORATION ORDONNEE DES DIRECTIONS EN F 
ARTANT DU PILIER HEURTE 

3110 IF TT>1 THEN 3250°CAS 2EME PASSAGE 
ET SUIVANTS 

3120 IF VXR=-1 THEN 3150’CAS 1ER PASSAGE 
; DÉTERMENAT LON DEL A DIRECTION Di DU 1ER 


HEU 

3130 IF VXR=O THEN 3180 

3140 IF VXR =1 THEN 3200 

3150 IF VYR=-1 THEN Di=5:GOTO 3230 
3160 IF VYR=O THEN D1=6:GOTO 3230 
3170 IF VYR=1 THEN D1=7:GOTO 3230 
3180 IF VYR=-1 THEN D1=4:GOTO 3230 
3190 IF VYR=1 THEN D1=8:GOTO 3230 
3200 IF VYR=-1 THEN D1=3:GOTO 3230 
3210 IF VYR=O THEN D1=2:GOTO 3230 
3220 IF VYR=1 THEN D1=1 

EN D=D1’DIRECTION D DEBUT DE L’EXPLORA 


ORASTON CNT (2ARND)? TIRAGE SENS DE L’EXPL 


3250 REM EXPLORATION POSITION SUIVANTE 
3260 _IF SS=0 THEN D=D+1:IF D<9 THEN 3280 
ELSE D=D-8:GOT0 3280 
3270 D=D- . IF D>0 THEN 3280 ELSE D=D+8 
3280 _IF _D=1 THEN 3290 ELSE IF D=2 THEN 3 
300 ELSE TF D=3 THEN 3310 ELSE 1F D=4 TH 
EN_3320 ELSE IF D=5 THEN 3330 ELSE 1F D= 
SLOUEN 3340 ELSE IF D=7 THEN 3350 ELSE 3 


3290 VXR=1:UVYR=1:GOTO 3370 
3300 VXR=1:VYR=O:GOTO 3370 
3310 VXR=1:VYR=-1:GOTO 3370 
3320 VXR=0:UYR=-1:GOTO 3370 
3330 UXR=-1:VYR=-1:GOTO 3370 
SR SUOUUE- 

== 0 3370 
3360 VXR=0O:UVYR=1 
3370 RETURN 
SOS FE SRE SES 'ARIRE EFIRUNT 

RETURN ELSE 

$>PYM_ THEN RETURN Fou 
4020 FOR FOIS=1 TO 4:SOUND 1,27,5,7:FOR 
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=1 TO 100:NEXT:NEXT 
30 FOR _AT=1 TO SOO0:NEXT:RG=RG+1:1F RG< 
de PEN DD PO io Pr Perl CHR$& 


AT 
a 
(33): GOTO 180 ELSE 


Commentaires techniques 


Le flou est introduit dans les composantes de la vitesse du robot. 
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VI 


CONCERTO ET VARIATIONS POUR DEUX ROBOTS 


‘Et que c’est long, le temps, et que c’est grand, le 

monde 

Et que nous aurions pu ne pas nous rencontrer.”” 
P. GÉRALDY. 
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Roméo va cesser de courir vers son maître. Il va maintenant, jusqu’en 
E20, s’élancer vers Juliette qui de son côté ira à sa rencontre avec le même 
empressement, c’est-à-dire, en langage artificiel, avec les mêmes heuris- 
tiques. 

Ce scénario permettra aux humains, non seulement d’assister à quel- 
ques effusions d'Amour Artificiel (A.A.)!, mais aussi d'étudier sérieu- 
sement un dispositif de commutation de la boucle des mouvements : il 
suffit ainsi d’une seule boucle pour les deux robots. 

On trouvera par ailleurs en E17 une nouvelle heuristique originale de 
dégagement G et en E18 la première intervention de fonctions logiques 
pour représenter un univers plus riche. 


1. Grâce à une onomatopée sophistiquée à la limite des possibilités du BASIC. 
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ÉTAPE E16 
TOI ET MOI 


Présentation 


Le but principal de ce scénario est d'ordre technique : proposer un 
outil de programmation pour le mouvement alterné de deux robots uti- 
lisant les mêmes heuristiques de navigation et de dégagement, par exemple 
les heuristiques 1 et C. 

Un tel dispositif, dont nous aurons besoin pour les quatre étapes sui- 
vantes, permet d'utiliser la même boucle pour les deux mobiles. Il 
comporte également un compteur de pas, affiché à l’écran, pour mesu- 
rer les performances, et le labyrinthe à maintenant 51 piliers. 

Il est intéressant de noter l'impression de recul ressentie avec le retour 
de cette heuristique C après l’heuristique évoluée F de E13-E14. La sen- 
sation d'intelligence évoquée en ES, E11 puis E13 est donc relative ; on 
ressent le rapport des intelligences de deux programmes, plus que l’intel- 
ligence absolue d’un programme. 

Telle heuristique brillamment ressentie donnera, quelque temps après, 
une piètre impression, confrontée à un récent perfectionnement vite entré 
dans les habitudes. 


Programme 


100 ’ETAPE Ei6:DEUX ROBOTS SE CHERCHANT 
DANS LABYRINTHE,51 PILIERS,HEURISTIQUE 
DE NAVIGATION (13,HEURISTIQUE DE DEGAGEM 
ENT (C),5 PARCOURS SUR MEME TERRAIN, POSS 

CHANGMT TERRAIN 

110 INK O,16:INK 1,1:INK 2,6:INK 3,21:CL 
S:CLEAR:R6=1 

120 DIM C(32,25)’TABLEAU DES CASES DE L' 
ECRAN SUSCEPTIBLES DE RECEVOIR UN PILIER 
150 SYMBOL AFTER 22:SYMBOL 33,8&0,&7C,&D6 
LéC, 838, LFE, &7C, L6C’ DESSIN RÜBOTS 

140 ?NOMÈRES ALEÂTOIRES VARIES 

150 RANDOMIZE TIME 

180 CLS:H=INT(Z2XRND):1F H=1 THEN PXRI=IN 
T(ZSXRND+6):PYRi=6 ELSE PXRi=6:PYRI=INT( 
12XRND+6)TIRAGE POSITION ROEOT NO 1 

170 PXR2=86: PYR2=21 POSITION DEPART ROBO 
T NO 


TE 


180 PEN 2:LOCATE PXR1,PYRI:PRINT CHR$(33 
) : LOCATE CRE PYR2:PRINT CHR$(33) "AFF RO 
BOTS AU DEPA 

190 IF RG>1 THEN 270 


200 FOR N=O TO SO:I=INT((33-PXR1) XRND) +P 
HR1-1:J=INT((21-PYR1)/(36-PXR1)X(I-PXR1) 
)+INT((SXRND-2)X(I1-PXR1)/8) +PYR1t+1 


210 IF J>PYRI-2 THEN 230 


220 J=PYRI-1:GOT0O 250 

230 IF J<>PYR1 THEN IF J<22 THEN 250 ELS 
E J=21:GOTO 250 

240 IF I<>PXRI1 THEN 250 ELSE J=PYRI-1 
250 PEN 1:LOCATE I,J:PRINT"'="?AFF PILIER 


269 C(I1,3)=1:NEXT'REPRESENTATION PILIER 


270 PXA=PXR1:PYA=PYR1:PPXA=PXA:PPYA=PYA’? 

MISE EN BOUCLE DU ROBOT NO1 (ACTIF) 

280 PXP=PXR2:PYPF=PYR2’MISE EN BOUCLE DU 

ROBOT NOZ (PASSIF) 

290 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
TOP DÉPABS 

1000 REM BOUCLE DES MOUVEMENTS 


1010 FOR M=i TO 100 

1020 TERRS=INKEYS: IF DE " THEN 110? 
CHANGMT TERFÈAS css 

1030 PEN 1:LOCATE 31, PRINT M5" "?AFF C 


OMPTEUR 

1040 REM HEURIST NAV (1) 

1050 IF PXA<>PXP THEN NUME=ABS (PYA-PYP): 
DENC=ABS (PXA-PXP): IN=NUME/DENO ELSE 1080 


1060 IF IN<O.S THEN VXA=SGN(PXP-PXA):UVYA 
=0:GOTO 1090 

1070 IF IN)>2 THEN VXA=O:VYA=SGN(PYP-PYA) 
: GOTO 1090 

1080 VXA=SGN(PXP-PXA):VYA=SGN(PYP-PYA) 
1090 TT=O0’INITIALISATION DU RANG TT DES 
PEMIATAUES POUR TROUVER UNE POSITION LIB 
APRES AVOIR HEURTE UN Ari di 

00 PXA=PPXA+UXA:PYA=PPYA+UY 

O IF PXA>31 THEN 1130 ÉLSE GOSUB 3000 
O IF OBS=1 THEN 1100 

O IF M/2=INT(M/2) THEN PER=30 ELSE PE 


O0 PEN 3:LOCATE PPXA,PPYA:PRINT CHRS&(3 

: PEN 2: LOCATE PXA,PYA:PRINT CHR&(33):S 
PER, : PPXASPXA: PPYA=PYA 

50 ÉbS08 2808" TEST RENCONTRE DES DEUX 


OTS 
1160 REM INVERSION DES DEUX ROBOTS 
1170 PXANOUV=PXP: PYANOUV=PYP:PXP=PXA:PYP 
Re AO NOUNR EM REPMENOUREEERBREAREER 


© 


1 
2 
3 
4 
4 
ND 
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1180 FOR N=1 TO 8O:NEXT:NEXT M 
1190 SOUND 1,500,40,7:G0OT0 4040* PARCOURS 
RATE 

1200 END 

2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG HEURT FILIER 

3010 OBS=0:TT=TT+1 

3020 IF C(EXA, PYA)<>1 THEN RETURN 

3030 FOR AT=1 TO 150:NEXT:SOUND 1 

: : PEN FLÔCATE PA, PYA: PRINTTRT:EOR AT 1 
‘TO 50: FNERT PEN 1:LOCATE PXA,PYA:PRINT"= 


2040 REM HEURIST DE DEGAGMT (C):TIRAGE À 
U SORT 1ERE DIRECTION DE DEGAGEMENT, PUIS 
EN CAS D’INSUCCES,EXPLORATION ORDONNEE 

ÈS AUTRES DIRECTIONS 
3050 FOR AT=1 TO 8O:NEXT:IF TT=1 THEN HA 

=INT(SXRND+1)::5SS= INT 2ERND) : GOTO 3090 
3060 IF S5=0 THEN HAS=HAS+1::1F HAS<9 TH 
EN 3090 ELSE HAS= HAS-8:GOTO 3090 
3070 HAS=HAS-1:IF HAS>O0 THEN 3090 
3080 HAS=HAS+S 
3090 IF HAS=1 THEN 3100 ELSE IF HAS=2 T 
HEN 3110 ELSE IF HAS=3 THEN 3120 ELSE IF 
HAS=4 THEN 3130 ELSE IF HAS=5 THEN 3140 
ELSE IF HAS=6 THEN 3150 ELSE IF HAS=? T 
EN 3160 ELSE "17 0 

VUXA=1:VYA=1:GOTO 3180 

VAE 1:VYA= 0: GOTO 3180 
VXA=1:VYA=-1:GOTO 3180 
UXA=0!VYA=-1:GOTO 3180 
UXA=-1:VYA=-1:GOTO 3180 
VXA=-1:VYA=0:GOTO 3180 
VUXA=-1:UYA=1:GOTO 3180 
VXA=0: VYA=1 
OBS=1 
RETURN 
REM SSPROG RENCONTRE DES DEUX ROBOT 


4010 IF PXA<>PXP THEN RETURN ELSE IF PYA 
{>PYP THEN RETURN 

4020 PEN 1: DT A PYA: PRINT ETS 
4030 FOR FOIS=1 4:SOUND 1 5275 : FOR 
AT=i TO 100:NEXT: INEXT 

4040 FOR AT=1 TO SOO:NEXT:RG=RG+1:1IF RGK 
6 THEN PEN 3:LOCATE PXA,PYA:PRINT CHR$(3 
3): GOTO- 180 ELSE 110 


PE eee bre me dede 
ON be be pre bee pes ht pen pet pe 
OCDURULUNE-O 
089000009908 


Commentaires techniques 


e Le principe consiste à rendre alternativement actif puis passif chacun 
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des deux protagonistes. Chacun exécute un pas en prenant l’autre 
comme cible, puis sert lui-même de cible à son partenaire. 


C’est le robot n° 1 (Juliette) situé à gauche qui fait le premier pas, 
conformément aux usages des pays situés à la pointe de la robotique. 
Juliette est donc ‘‘mise en boucle’’ en tant que robot actif A. Roméo 
est de même mis en boucle en tant que robot passif P. 


On ne trouvera ensuite dans la boucle des mouvements que ces deux 
‘robots de paille’” qui changeront d'identité à chaque nouvelle boucle. 


Cette boucle est exactement rédigée comme d’habitude, en rempla- 
çant le maître M par le robot passif P et le robot R par le robot actif 
A. Seule la tonalité du bip ponctuant le pas de chaque robot est diffé- 
renciée pour faciliter le suivi. On utilise à cette fin la parité ou l’impa-. 
tité du rang de la boucle (impair pour Juliette, pair pour Roméo). 


En fin de boucle on opère la commutation, c’est-à-dire l’inversion des 
deux robots, À prenant la place de P et réciproquement. On notera 
l’utilisation des variables accessoires PXANOUV et PYANOUV pour 
éviter un cercle vicieux dans les échanges d'identité. Le lecteur per- 
plexe pourra essayer de s'affranchir de cette complication apparem- 
ment gratuite pour se convaincre de son utilité. 


Les sous-programmes sont également identiques à ceux des exemples 
précédents. 
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ÉTAPE E17 
UNE HEURISTIQUE PIPÉE POUR UN PAS DE DEUX 


Présentation 


Le labyrinthe comporte donc 51 piliers et non plus les 31 habituels. 
Leur densité complique ainsi la tâche des robots et les amène à utiliser 
les grands moyens : #richer. 

C'est ainsi qu'avec une heuristique de dégagement relativement médio- 
cre, l’heuristique C de E16, ils vont tenter de se retrouver plus rapide- 
ment, en effectuant un pas de deux à pirouettes, plus précisément en 
effectuant deux pas dans la direction de dégagement au lieu d’un. 

Cette heuristique malhonnête prend l'appellation G. 

Les parcours successifs obtenus montrent l'efficacité du procédé : 
lorsqu'il s’agit de s’écarter d’un danger, deux fois valent mieux qu’une. 


Programme 


100 ’ETAPE E17:DEUX ROBOTS SE CHERCHANT 
DANS LABYRINTHE,S1 PILIERS,HEURISTIQUE 
DE NAVIGATION (1) ,HEURISTIQUE DE DEGAGEM 
ENT (G),5 PARCOURS SUR MEME TERRAIN, POSS 

CHANGMT TERRAIN 

110 INK O,16:INK 1,1:INK 2,6:INK 3,21:CL 
S: CLEAR : R6=1 
120 DIM C(32,25)’TABLEAU DES CASES DE L’ 
ECRAN SUSCEPTIBLES DE RECEVOIR UN PILIER 
130 SYMBOL AFTER 32:SYMBOL 33,&0,&7C, &Dé 
&6C,R36,RFE, &7C, K6C’ DESSIN RÜBOTS 

140 ?NOMBRES ALEATOIRES VARIES 

150 RANDOMIZE TIME 

160 CLS:H=INT(Z2XRND):1F H=1 THEN PXRI=IN 
T(25XRND+6) :PYR1=6 ELSE PXR1=6:PYRI=INT( 
12XRND+6)’TIRAGE POSITION ROBOT NO 1 

170 PXR2=36: PYR2=21? POSITION DEPART ROBO 


T NO 
180 PEN 2:LOCATE PXRI,PYRI:PRINT CHRS(33 
):LOCATE PXR2,PYRZ:PRINT CHR$(33) "AFF RO 
BQTS AU DEPART 

190 IF RG)1 THEN 270 


200 FOR N=O TO 50:I=INT((33-PXR1) XRND) +P 
XR1-1:J=INT((21-PYR1)/(36-PXR1)X(I-PXR1) 
)+INT((SXRND-2)#(I1-PXR1)/8) +PYR1I+1 

210 IF J>PYR1-2 THEN 230 


— 111 — 


220 J=PYRI-1:GOTC 250 

230 IF J<>PYR1 THEN IF J<22 THEN 250 ELS 
E J=21:GOT0 250 

240 IF I<>PXRI1 THEN 250 ELSE J=PYRIi-1 


250 PEN 1:LOCATE I,J:PRINT"'="?AFF PILIER 
260 C(I1,J)=1:NEXT’REPRESENTATION PILIER 


270 PXA=PXR1:PYA=PYR1:PPXA=PXA:PPYA=PYA? 
MISE EN BOUCLE DU ROBOT NO1 (ACTIF) 

280 PXP=PXR2:PYP=PYR2Z’MISE EN BOUCLE DU 
ROBOT NOZ2 (PASSIF) 

290 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
XT°’TOP DEPART 

295 MOB=-2°INITIALISATION PARAMETRE MOB 
POUR EVITER DEVOIEMENTS INTEMPESTIFS AUX 
BOUCLES NOS 1 ET 

1000 REM BOUCLE DES MOUVEMENTS 


1010 FOR M=i TO 100 

1020 TERR#S=INKEYS: IF TERR$=" " THEN 110? 
CHANGMT TERRAIN ENS SE 

1030 PEN 1:LOCATE 31,2:PRINT Mj" "’AFF C 
OMPTEUR 


1040 REM HEURIST NAV (1) 

1050 REM HEURIST DE DEGMT (G):SI HEURT A 
BOUCLE M=MOB,PAS DE MOUVMT DE L'AUTRE KR 
OBOT À BOUCLE MOB+1,ET REPETITIONDU MOUV 
MT DU ROBOT HEURTEUR À BOUCLE MOB+2 

1060 IF M=MOB+1 THEN î190 

1070 IF M=MOB+2 THEN 1130 

1080 IF PXA<>PXP THEN NUME=ABS (PYA-PYP): 
DENO=ABS (PXA-PXP) : IN=NUME/DENO ELSE 1110 


1090 IF IN<O.S5 THEN VXA=SGN(PXP-PXA):VYA 

=0:GOTO 1120 

1100 IF IN>2 THEN VXA=O:VYA=SGN(PYP-PYA) 

: GOTO 1120 

1156 VXA=SGN(PXP-PXA):VYA=SGN(PYP-PYA) 
20 TT=O0O’INITIALISATION DU RANG TT DES 

TÉNTATIVES POUR TROUVER UNE POSITION LIB 

RE APRES AVOIR HEURTE UN PILIER 

1130 PXA=PPXA+UXA: PYA=PPYA+VYA 

1140 IF PXA>31 THEN 1160 ELSE GOSUB 3000 

50 IF OBS=i THEN 1130 

5e IF M/Z=INT(M/2) THEN PER=30 ELSE PE 


[e) 
0 de 3: LOCATE PPXA,PPYA:PRINT CHR#&(3 


T 
O REM INVERSION DES DEUX ROBOTS 

O PXANOUV=PXP:PYANOUV=PYP:PXP=PXA:PYP 
A: PXA=PXANOUV: PYA=PYANOUV:PPXA=PXA:PP 


7 
:PEN 2:LOCATE PXA; PYÀ: PRINT CHRS (33) :5 
ND 1 FER. S KXA=PXA: PPYA=PY 

80 GÈSUE 3600? TEST RENCONTRE DES DEUX 
9 

0 

ÿ 
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YA=PYA 
1210 FOR N=1 TO SO:NEXT:NEXT M 
nt SOUND 1,500,40,7:GO0OTO 4040? PARCOURS 


E 
1230 END 
2000 REM ZONE DES SOUS- FRSSROUNES 
3000 REM ose HEURT PILI 
3010 OBS=O0:TT=TT+1 
3020 IF CiEXA, PYA)<>1 THEN ND 
3030 FOR AT=1 TO 150:NEXT:SOUND 
:: PEN 2: LÔCATE PXA,PYA:PRINT" Y°: FÜR A2 FH 
T0 50: NEXT:PEN 1:LOCATE PXA,PYA:PRINT'"= 


3040 REM HEURIST DE DEGAGMT (G):TIRAGE A 
U SORT 1ERE DIRECTION DE DEGAGEMENT, PUIS 
EN CAS D’INSUCCES,EXPLORATION ORDONNEE 

ÈS AUTRES DIRECTI ONS 

3050 FOR AT=1 TO SO:NEXT:1F TT=1 THEN HA 
DS RN Dr Lie Se INT(2#RND):GOTO 3090 

3060 IF SS=0 THEN HAS= HAS+A 3: IP HAS<9 TH 

EN 3090 ELSE HAS=HAS-8:GOTO 3090 

3070 HAS=HAS-1:IF HAS>0 THEN 3090 

3080 HAS=HAS+8 

3090 IF HAS=1 THEN 3100 ELSE IF HAS=2 T 

HEN 3110 ELSE IF HAS=3 THEN 3120 ELSE IF 

HAS=4 THEN 3130 ELSE 1F HAS=5 THEN 3140 

ELSE IF HAS=é THEN 3150 ELSE IF HAS=? T 


O VXA=1: VYA=1: GOTO 3180 

O VXA=1:VYA=0: GOTO 3180 

O VXA=1: VYA=-1: GOTO 3180 

O VXA=O: VYA=-1:GOTO 3180 

O VXA=-1: VYA=-1:GOTO 3180 

O VXA=-1:VYA=0:GOTO 3180 

O VXA=-1: VYA=1: GOTO 3180 

O VXA=O:VYA=I 

O0 OBS=1:MOB=M’MEMO NO BOUCLE 
O RETURN 

O REM SSPROG RENCONTRE DES DEUX ROBOT 


O_ IF PXA<>PXP THEN RETURN ELSE IF PFYA 
<>PYP ea RETURN 

4020 FEN 1:LOCATE PXA,PYA: PRINT SEC 
4030 FOR FOTS= 1 TO 4:BOUND 1 5275957: FOR 


K 
4040 FOR AT=1 TO 800: NEXT:RG=RG+1:1F RGK 
6 THEN FEN 3:LOCATE PXA,PYA: PRINT CHR#&(3 
3):GOT0 180 ELSE 110 


Commentaires techniques 


e Le double dégagement est obtenu en retouchant légèrement la boucle 
des mouvements. 
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e Si un robot rencontre un pilier lors de la boucle de rang M (rang que 
l’on mémorise dans le sous-programme heurt pilier sous l'identité 
MOB = M), l’autre robot ne fait aucun mouvement lors de la boucle 
suivante MOB + 1, et le premier cité répète son mouvement de déga- 
gement lors de la boucle MOB + 2. 


° Noter qu'avant le départ de chaque parcours, il faut initialiser ou réini- 
tialiser le paramètre MOB à la valeur bizarre de — 2 pour éviter des 
anomalies aux boucles n % 1 et 2 du premier parcours, puis aux bou- 
cles MOB + 1 et MOB + 2 correspondant au dernier pilier rencontré 
lors du parcours précédent. 


— 114 — 


ÉTAPE E18 
DIVERSITÉ QUALITATIVE — LES FONCTIONS LOGIQUES 


Présentation 


Jusqu'à présent, le monde des robots se réduisait à des piliers. Cet uni- 
vers ultra-simplifié était facilement représentable dans l’ordinateur, soit 
par les coordonnées de ces piliers, soit, à partir de E9, par la vérité ou 
la fausseté d’un prédicat affirmant : ‘Dans telle case de l’écran, il y a 
un pilier’”, et prenant conventionnellement la valeur 1 dans le premier 
cas et 0 dans le second. Nous avons pu constater la rapidité d’exécution 
que procure cet outil à deux positions. 

Cette fois, le monde se complique : l’architecte Dédale à placé dans 
son labyrinthe, non pas un Minotaure, mais de visqueuses créatures, les 
Gluons, que Roméo et Juliette doivent dévorer dès qu’ils en touchent 
une, avant de poursuivre leur chemin. 

Pour représenter cet univers un peu plus complexe, nous allons utili- 
ser une entité C(I, J) susceptible de prendre, non plus seulement les deux 
valeurs 0 ou 1 (vrai ou faux) d’un prédicat, mais une infinité de valeurs 
possibles, suivant ce qu’elle doit désigner. 

Ces valeurs peuvent être numériques (0, 1, 2, 3...), mais elles peu- 
vent tout aussi bien être des chaînes de caractères (des mots) et c’est cette 
dernière forme que nous allons tester dans le présent exemple. 

Cette entité, de portée plus générale que le prédicat, prend le nom 
de fonction logique. Xci, nous l’appellerons C$(I, J) pour marquer sa nature 
non numérique. Elle prend pour chaque case d'écran de coordonnées I, 
J une valeur (une appellation qualitative) qui varie suivant la nature de 
l'élément qui se touve dans la case. 

Ainsi, l’on décide que : 


e si la case est vide, C$(I, J) = ‘“* ?” (chaîne de caractères ‘‘vide’””); 
e si la case contient un pilier, C$(I, J) = ‘‘PIL”’; 
e si la case contient un Gluon (obstacle éliminable), C$(I, J) = ‘‘OE”’; 


e si la case contient le robot passif, C$(I, J) = ‘‘RO”’. 


Rappelons, suivant la terminologie adoptée en E16, que le robot actif 
est celui qui fait le mouvement élémentaire tandis que l’autre robot, dit 
passif, reste immobile, et qu’à la boucle suivante les rôles sont inversés. 
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La fonction logique C$(I, J) représente donc tous les éléments de l’uni- 
vers du robot actif, éléments vis-à-vis desquels il a des comportements 
spécifiques différents : il passe dans les cases vides, il contourne les piliers, 
il Zévore les Gluons et il fermine son paicours s’il atteint le robot passif. 

À l'exception du premier qui n’en est pas un, chacun de ces trois 
comportements est réglé par un sous-programme spécialisé, ainsi que nous 
l'avons déjà constaté dans des cas plus simples. 

Pour savoir s’il existe ou non ‘‘quelque chose’” dans la case de coor- 
données PXA, PYA où se trouve le robot actif, il suffit de voir quelle 
valeur (appellation) prend la fonction C$(PXA, PYA). 

C'est simple, général et puissant. 

L’heuristique de dégagement C adoptée dans le présent exemple est 
assez simple, pour ne pas surcharger le programme démonstratif. 

L'on voit Roméo et Juliette cheminer et dévorer les Gluons par des 
itinéraires divers. Lors de chaque parcours, le terrain est progressivement 
nettoyé des Gluons qui l’encombrent et nous verrons dans les commen- 
taires techniques comment leur disparition se traduit dans le programme. 

Le nombre de piliers a été multiplié pour accentuer la variété des iti- 
néraires ; chaque terrain nouveau est parcouru cinq fois. 


Programme 


100 ETAPE E18:2 ROB DS LAB,PIL ET OBST 

ELIMINABLES,HEUR NAV (1) ,HEÜR DEG (C) ,UT 
ILISATION FONCTION LOGIQUE C#(1,J) POUR 

REPR LES ELEM DE L’UNIVERS DU ROBE ACTIF, 
S PARC SR MM TERR,POSS CHGMT TERR 

110 INK O,16:INK 1,1:INK 2,6:INK 3,21:CL 
S:CLEAR:RG=1 

120 REM FONCTION LOGIQUE C$(I1,J) DONNANT 
L’OCCUPATION DES DIVERSES CAES DE L’'EC 


RAN 

130 REM VALEURS DE C$ POUR LES DIVERS EL 
EMENTS ELEMENTS DE L’UNIVERS DU ROBOT AC 
TIF;CASE VIDE:C$=" ";PILIER:C$="P1"; OBST 
ELIMINABLE:C$="O0E"; ROBOT PASSIF:C$="RO" 
140 DIM C#(35,25) ’TABLEAU DES CASES DE L 
dE SUSCEPTIBLES DE RECEVOIR UN ELEME 


150 SYMBOL AFTER 32:SYMBOL 33,&0,&7C, &Dé 
LéC,838,RFE , &7C, k6C’ DESSIN RÜBOTS 
160 ?NOMÈBRES ALEÂTOIRES VARIES 

170 RANDOMIZE TIME 

180 CLS:PXR1=5:PYRI=INT (15XRND+6) * TIRAGE 
POS ROBOT NO i 
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190 PXR2=35; PYR2= INT(1SXRND+6)’TIRAGE PO 
200 PEN 1:LOCATE PXR1,PYRI1:PRINT CHRS(33 
):LOCATE PXR2,PYR2:PRINT CHR$(33)’AFF RO 
BOTS AU DEPART 

210 IF RG)>1 THEN 280 

220 FOR N=i TO 100:1I=2X#INT(12YXRND)+6:J=1 
NT(17XRND+5)°TIRAGE POS 100 PILIERS SUR 

COLONNES PAIRES 

230 PEN 1:LOCATE I,J:PRINT"=""AFF PILIER 
230 CH(I, TOR T SL NEXT REPRESENTATION PI 


LIER 
250 FOR N=1 TO 100:1I=2#INT(12XRND)+7:J=1I 
NT(19XRND+4)’TIRAGE POS 100 OBSTACLES EL 
IMINABLES SUR COLONNES IMPAIRE 

260 PEN 2:LOCATE 1,J:PRINT CNRS (189)? AFF 
BST ELIMà 
270 CH(I1,J)="0E"::NEXT'REPRES OBST ELIM 
280 PXA=PXR1 : PYA=PYR1 : PPXA=PXA: PPYA=PYA”? 
MISE EN BOUCLE DU ROBOT NO1 (ACTIF) 
290 PXP=PXR2:PYP=PYR2'MISE EN BOUCLE DU 
ROBOT NOZ2 (PASSIF) 
300, See PYP)="RO"'REPRESENTATION ROBO 
310 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
XT’ TOP DÉPABT 

1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=1 TO 200 

1020 TERR$S=INKEYS: IF TERR$=" " THEN 110” 
CHANGMT TERRAIN EVENTUEL 

1030 PEN 1:LOCATE 31,2:PRINT M;" "’AFF C 
OMPTEUR 

1040 REM HEURIST NAV (1) 

1050 IF PXA<)PXP THEN NUME=ABS (PYA-PYP): 
DENO=ABS (PXA-PXP) : IN=NUME/DENO ELSE 1080 


CS OUTO HÉre S THEN VXA=SGN(PXP-PXA) :VYA 
ACTE 1090 THEN VXA=O0:VYA= SGN(PYP- -PYA) 
1080 VXA=SGN(PXP-PXA):VYA=SGN(PYP-PYA) 
1090 TT=O’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE Fes on LIiB 
RE APRES AVOIR HEURTE UN PILIE 

1100 PXA=PPXA+VXA:PYA=PPYA+VYA 

10 IF PXA>29 THEN 1130 ELSE GOSUB 3000 
EST HEURT PILIER 

20 IF OBS=1 THEN 1100 

30 IF PXA>29 THEN 1140 ELSE GOSUB 4000 
EST RENCONTRE OBST ELIM 

2 IF M/2=INT(M/2) THEN PER=30Q ELSE PE 
5 


0 
à PEN 3:LOCATE PPXA,PPYA:PRINT CHR$(3 


1 
I 
1 
1 
T 
1 
1 
):PEN 1:LOCATE PXA.PYA:PRINT CHR$(33):S 


WT “hebe she 


fi 


OUND 1,PER, : PPXA=PXA: PPYA=PY 

1160 & GhSUS SO TEST RENCONTRE DES DEUX 
1170 BEM INVERSION DES DEUX ROBOTS 

1180 PXANOUV=PXP : PYANOUV=PYP:PXP=PXA:PYP 
=PYA:P PXA= BRANOUU à PYA=PYANOUV: PPXA=PXA : PP 
1190 REM INVERSION REPRESENTATION DU ROBE 
OT PASSIF 

1200 CH(PXA,PYA)=" ":CS(PXP PYP)= "RO" 
1210 FOR N=i TO 300:NEXT:NEXT 

1220, SOUND 1,500,40,7:GOT0 20407 PARCOURS 


1230 END 
2000 REM ZONE DES SOUS- PROGRAMMES 

5000 REM SSPROG HEURT PILIER 

3010 OBS=0:TT=TT+1 

3020 IF CSiPXA PYA)<>"PI" THEN RETURN 
3030 FOR fo 150:NEXT:SOUND 7 
::PEN 2: LÔCATE PXA} PYA: ÉRINTT RE: FÜR AT 1 
“TG SO:NEXT: PEN :LOCATE PXA,PYA:PRINT"= 


3040 REM HEURIST DE DEGAGMT (C):TIRAGE A 
U SORT 1ERE DIRECTION DE DEGAGEMENT, PUIS 
EN CAS D’INSUCCES,EXPLORATION ORDONNEE 

ËS AUTRES DIRECTIONS 

3050 FOR AT=i TO 80:NEXT:1F TT=1 THEN HA 
Se INT (S#RND+ 1): 1 66= INT (2XRND):GOTO 3090 

IF SS=0 THEN HAS=HAS+1::1F HAS<9 TH 

EN° So30 ELSE HAS= HAS-8:GOTO 3090 

3070 HAS=HAS-1:1F HAS)0 THEN 3090 

3080 HAS=HAS +8: 

3090 IF HAS=1 THEN 3100 ELSE IF HAS=2 T 
HEN 3110 ELSE IF HAS=3 THEN 3120 ELSE IF 
HAS=4 THEN 3130 ELSE IF HAS=5 THEN 3140 
ELSE IF HAS=6 THEN 3150 ELSE IF HAS=7 T 


HEN 3160 ELSE se 

3100 VXA=1: VYA=1: GOTO 3180 
3110 VXxA=1:VYA= ô: GOTO 3180 
3120 VXA=1!VYA=-1:GOTO 3180 
3130 VXA=O0: VYA=-1: GOTO 3180 
3140 VXA=-1: VYA=-1: GOTO 3180 
3150 VXA=-1:VYA=0O:GOTO 3180 
3160 VXA=-1:VYA=1: GOTO 3180 
3170 VXA=O:VYA=I 

3180 OBS= 

3190 RETURN 

= REM SSPROG RENCONTRE OBST ELIMINABL 


4010 IF CS(PXA,PYA) <)"OE* THEN RETURN 

FOR AT=1 TO 150:NEXT:SOUND 1,24,5,7 
:PEN 1:LOCATE PXA,PYA:  ÉRINTE EL FOË at=i 
TO SO:NEXT:PEN 2:LOCATE PXA,PYA:PRINT CH 
R$ (189) "VISUALISATION RENCONTRE: 
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4920 RENE AMINTLON. STAGE 
: =": 2000,30, 7: 
SOUND 1,700, 26 9 7:FOR AT=1 TO 300: NËXT'RE 


200 REM SSPROG RENCONTRE DES DEUX ROBOT 


2010 IF PXA<>PXP THEN RETURN ELSE IF FYA 
EU RENÉE à 

XA,PYA: PRINT Chris: 
5030 FOR FOIS= 4:ÉOUND 1 5275937: FOR 
AT=1 TO 100: NEXT: INEXT 
3040 FOR _AT=1 TO SOO:NEXT:RG=RG+1:1F RG 
6 THEN PEN 3: LOCATE PXA,PYA:PRINT CHR#&(3 
3):GOT0 200 ELSE 110 


Commentaires techniques 


Les divers éléments sont tirés au sort, affichés à l’écran, puis représen- 
tés par la fonction C$(I, J), en amont de la boucle des mouvements. 


On voit, dans les trois sous-programmes spécialisés, l’intervention de 
la fonction logique C$ pour tester la présence éventuelle d’un pilier, 
d’un Gluon ou du robot passif dans la case où se trouve le robot actif. 


Noter que les Gluons, après avoir été dévorés, doivent bien entendu 
disparaître de la scène, visuellement et sémantiquement, comme nous 
l’avions déjà vu avec les prédicats. Cette fois, la disparition sémanti- 
que se traduit par la remise à vide de la fonction C$(PXA, PYA). 
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ÉTAPE E19 
DES ROBOTS QUI BROIENT DU NOIR — LE TEST DE TURING 


Présentation 


En regardant Roméo et Juliette parcourir plus ou moins maladroite- 
ment le labyrinthe, on est tenté de penser qu'ils ne sont pas très futés 
et que l’on ferait certainement mieux. 

Rappelons à ce propos que l’Anglais Alan Turing a inventé un test 
célèbre consistant, pour un observateur humain, à comparer dans des 
conditions parfaites d’‘‘anonymat”’ les performances d’un programme 
d’I.A. et celles d’un homme. 

Si l'observateur n'arrive pas à faire la différence, on en déduit que 
le programme est intelligent. On se garde bien de déduire que l’homme 
est idiot, car une telle hypothèse n’a jamais effleuré personne. 

Si l'observateur était un programme d’I.A., il déduirait probablement 
que l’homme est intelligent pour les mêmes raisons d’autoréférence que 
ci-dessus. 

Redevenons sérieux ? et revenons à nos deux robots mal dégrossis. 

Il est difficile de se rendre compte que cette fâcheuse impression pro- 
vient en grande partie du fait que le spectateur humain voit les positions 
d'ensemble et de détail des piliers et des Gluons, alors que les robots, 
comme nous l'avons précisé, ne disposent que de leur sens du toucher, 
leur vue leur permettant seulement de situer la direction de leur coreli- 
gionnaire. 

Un sens supplémentaire constitue une importante source de valeur ajou- 
tée pour l'intelligence. Il est facile de s’en rendre compte en privant le 
spectateur de cet atout : tel est l’objet du présent exemple. 

Après la mise en place habituelle des piliers et des Gluons de E18, 
l’écran s’obscurcit et l’on ne voit plus, dans le noir absolu, que Roméo 
et Juliette. Ils n’en sont nullement gênés et entament leur périple en opé- 
rant comme d’habitude, c’est-à-dire en tâtonnant, ce qui est aussi effi- 
cace dans le noir qu’à la lumière du jour. Il n’en est pas de même pour 
le spectateur, alors bien obligé de se mettre à leur place, et qui devient 
ainsi un peu plus indulgent, sinon plus admiratif. 


2. Le test de Turing est brillamment présenté, avec toutes ses subtilités, dans le livre de Douglas 
Hofstadter cité au Chapitre 11. 
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Programme 


100 ‘’ETAPE E19:COMME E18 AVEC ECRAN OBSC 
UR 


110 INK O,16:INK 1,1:INK 2,6:INK 3,21:PA 

PER 0:CLS:CLEAR:RG=1 

ee REM FONCTION LOGIQUE C#(1,9J) Dee 
*OCCUPATION DES DIVERSES CASES DE L’'EC 

AN 


REM VALEURS DE C$ POUR LES DIVERS EL 
TS ELEMENTS DE L’UNIVERS DU ROBOT AC 
CASE VIDE:C#=" ";PILIER:C$="Pl'";OBST 
MINABLE: CH= "OE" ; ROBOT PASSIF: CH="RO" 
DIM C#(35 25) * TABLEAU DES CASES DE L 
RAN SUSCEPTIBLES DE RECEVOIR UN ELEME 


j 
150 SYMBOL AFTER 82: SYMBOL 33 &7C,&D6 
LéC, 838, RFE , &7C * DESSIN RbEOTS 

160 NOMBRES” RLÉATOTRES VARIES 

170 RANDOMIZE TIME 

180 CLS: PXRIZS: PYRI=INT (15XRND+6) ’ TIRAGE 
POS ROBOT NO 

{90 PNR2=SS LP VRZ= INT(ISXRND+6)TIRAGE PO 
200 PEN 2:LOCATE PXR1,PYRI:PRINT CHR$(33 
):LOCATE PXR2,PYRZ:PRINT CHR$(33) AFF RO 
BÜTS AU DEPART 

210 IF RG>1 THEN 280 

220 FOR N=1 TO 100:I=2XINT(12XRND)+6:J=1 
NT(17XRND+5)TIRAGE POS 100 PILIERS SUR 
COLONNES PAIRES 

230 PEN 1:LOCATE 1,J:PRINT"=""AFF PILIER 
240 CH(I, TES PLe: NET *REPRESENTATION PI 


LIER 

250 FOR N=1 TO 100:I=2#INT(12#RND)+7:J=I 

NT(19XRND+4)’TIRAGE POS 100 OBSTACLES EL 

IMINABLES SUR COLONNES IMPAIRES 

260 PEN 2:LOCATE I,J:PRINT CHR$(189)°AFF 
GEST ELIMà 

270 C#(I,J)="OE"::NEXT'REPRES OBST ELIM 

280 PXA=PXR1:PYA=PYRI : PPXA=PXA: PPYA= PYA’? 

MISE EN BOUCLE DU ROBOT NO1 (ACTIF) 

290 PXP=PXR2:PYP=PYR2'MISE EN BOUCLE DU 

ROBOT NO2 (PASSIF) 

300 CS (PXP, ,PYP)="RO"?REPRESENTATION ROBO 

310 IF RG<{)1 THEN 330 ELSE FOR AT=1 TO 5 

00: NEXT:SOUND 1,1000,60,7:FOR AT=1 TO 80 
OZ NEXT : PAPER 1:ËLS”? DRSCURÉTSSEMENS DE L'’ 


EC 

re FOR_AT=1 TO 40O:NEXT:PEN 2:LOCATE PX 
,PYA: PRINT CHR$(33):LOCATE PXP,PYP:PRIN 

T° CHR$S (33) * REAFF ABLE AU DEPART 

330 SOUND 1,200,80,7:FO0R AT=1 TO 2000:NE 


130 
EMEN 
TIF; 
ELI 
140 
EC 
NT 
ES 
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XT°’TOP DEPART 

1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=1i TO 200 

1020 TERRS=INKEYS: IF TERR$S=" " THEN 110? 
CHANGMT TERRAIN EVENTUEL 

1030 PEN 1:LOCATE 31,2:PRINT M;5" "?’AFF C 


R 
1040 REM HEURIST NAV (1) 
1050 IF PXA<>PXP THEN NUME=ABS (PYA-PYP): 
DENO=ABS (PXA-PXP) : IN=NUME/DENO ELSE 1080 
1060 IF IN<O.S THEN VXA=SGN(PXP-PXA):VYA 
=0:GOTO 1090 
1070 IF IN>2 THEN VXA=0:VYA=SGN(PYP-PYA) 
: GOTC 1090 
1080 VXA=SGN(PXP-PXA) : VYA=SGN(PYP-PYA) 
1090 TT=O’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN PILIER 
1100 PXA=PPXA+UVXA: PYA=PPYA+VYA 


1110 IF PXA>29 THEN 1130 ELSE GOSUB 3000 
TEST HEURT PILIER 

1120 IF OBS=1 THEN 1100 

1130 IF PXA>29 THEN 1140 ELSE GOSUB 4000 
TEST RENCONTRE OBST ELIM 

1140 IF M/2=INT(M/2) THEN PER=30 ELSE PE 
1150 PEN 3:LOCATE PPXA,PPYA:PRINT CHR#(3 
3):PEN 2:LOCATE PXA,PYA:PRINT CHR$(33):5S 
OUND 1,PER,5,7:PPXA=PXA: PPYA=PYA 

1160 GbSUB 5000’ TEST RENCONTRE DES DEUX 
1170 REM INVERSION DES DEUX ROBOTS 


1180 PXANOUV=PXP: PYANOUV=PYP: PXP=PXA:PYP 

AU TARN NON ER TRS EMANQONSPEARRESR EEE 
=PYA 

11970 REM INVERSION REPRESENTATION DU ROE 

OT PASSIF 

1200 CH(PXA,PYA)I=" "ICHB(PXP,PYP)="RO" 

1210 FOR N=i TO 300:NEXT:NEXT M 

1220 SOUND 1,500,40,7:GOTO 5040?PARCOURS 


RATE 
1230 END 

23000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG HEURT PILIER . 

3010 OBS=0:TT=TT+1 

3020 IF CH(PXA,PYA)<)"PI" THEN RETURN 
3030 FOR AT=1 10 150:NEXT:SOUND 1,24,5,7 
::PEN 2:LOCATE PXA,PYA:PRINT"=":FÜR ÀT=1 
"T0 SO:NEXT:PEN 1:LOCATE PXA,PYA:PRINT"= 


3040 REM HEURIST DE DEGAGMT (C):TIRAGE A 
U SORT 1ERE DIRECTION DE DEGAGEMENT, PUIS 
EN CAS D’INSUCCES,EXPFLORATION ORDONNEE 

ÈS AUTRES DIRECTIONS 
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3050 FOR AT=1 TO SO:NEXT:IF TT=1 THEN HA 
S=INT(SX*RND+1)::SS=INT (ZXRND) : GOTO 3090 
3060 IF SS=0 THEN HAS=HAS+1::1F oo TH 
EN _ 3090 ELSE ee HAS-8:GOTO 309 

3070 HAS=HAS-1:1IF HAS>0 THEN 3090 

3080 HAS=HAS +8: 

3090 IF HAS=1 THEN 3100 ELSE IF HAS=2 T 
HEN 3110 ELSE BF HAS=3 THEN 3120 ELSE IF 
HAS=4 THEN 3130 ELSE IF HAS=S THEN 3140 
ELSE IF HAS=6 THEN 3150 ELSE IF HAS=7 T 
HEN 3160 ELSE 3170 


3100 VXA=1:VYA=1: GOTO 3180 

3110 VXA=1:VYA=O: GOTO 3180 

3120 VXA=1: VYA=-1: GOTO 3180 

3130 VXA=O:VYA=-1: GOTO 3180 

3140 VXA=-1: VYA=-1: GOTO 3180 

3150 VXA=-1:VYA=0O: GOTO 3180 

3160 VXA=-1:VYA=1: GOTO 3180 

3170 VXA=O0:VYA=I 

3180 OBS= 

3190 RETURN 

ESS REM SSPROG RENCONTRE OBST ELIMINABL 
4010 0 UE PYA)<>"OE" THEN PET 


To 150:NEXT:SOUND 5,7 
: PEN Le OR OCATÉ PXA,PYA:PRINT EuRs 1180) 79 ÿI 
SUALISATION RENCONTRE 

4030 REM ELIMINATION. GBSTACLE 

4040 :CH(PXA,PYA)=" ":FOR AT=1 TO 800:NE 
XT : SOUND 1,2 d00,30,7 7: : SOUND 1,200,5,7:FOR 
5000 REM SSPROG RÉNEONTRE DES DEUX ROBOT 


5010 1F PXAC2PXP THEN RETURN ELSE IF PYA 
<)PYP THEN RETUR 

5020 PEN 0: ÉGCATE PXA PYA: PRINT GHRS (32) 
5030 FOR FOIS=1 TO 4:S6OUND 1,27,5,7:FOR 
AT=1i TO 100: NEXT: NEXT 

5040 FOR AT=1 TO 1500:NEXT:RG=RG+1:1F RG 
(6 THEN PEN 3:LOCATE PXA,PYA:PRINT CHRS( 
33):GO0T0 200 ELSE 110 


.£ 
O 
MN 
© 


Commentaires techniques 


e L'écran ne s’obscurcit qu'après l'affichage de tous les éléments, pour 
mettre le spectateur en condition. 


e L'accompagnement audiovisuel des tâtonnements des robots en mou- 
vement est conservé, et prend ici toute sa valeur. 
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ÉTAPE E20 
LE FIL D'ARIANE 


Présentation 


Même scénario qu’en E16, Roméo et Juliette se cherchent dans le laby- 
rinthe désert. 

Mais, fatigués de parcourir plusieurs fois le même terrain et de tou- 
jours procéder à de fastidieux tâtonnements, ils décident de se concen- 
trer, de mémoriser avec précision leur premier parcours afin de le refaire 
ensuite sans hésiter et sans toucher un seul pilier. 

La mémorisation des positions successives est réalisée dans un tableau 
indicé que le BASIC permet de construire, puis de manipuler aisément. 
Le programme ci-après permet d’apprécier l’effet assez spectaculaire de 
cette restitution mentale. 


Programme 


100 ’ETAPE E20:DEUX ROBOTS SE CHERCHANT 
DANS LABYRINTHE,S1 PILIERS,HEURISTIQUE 
DE NAVIGATION (1},HEURISTIQUE DE DEGAGEM 
ENT (C),FARCOURS D'APPRENTISSAGE UNIQUE 

ET REEXÉCUTION,POSS CHANGMT TERRAIN 


110 INK O,16:INK 1,1:INK 2,6:INK 3,21:CL 
S: CLEAR: R6=1 

120 DIM C(32,25)’TABLEAU DES CASES DE L’ 
ÉCRAN SUSCEPTIBLES DE RECEVOIR UN PILIER 
130 SYMBOL AFTER 32:SYMEOL 33,&0,&7C,&D6 
RéC,&38,RFE, &?C, kéC’ DESSIN RÜBOTS 

140 NOMBRES ALEATOIRES VARIES 

150 RANDOMIZE TIME 

160 CLS:H=INTIZXRND):IF H=1 THEN PXRI=IN 
T(2SXRND+6) :PYRi=6 ELSE PXR1=6:PYRI=INT( 
12XRND+6) 'TIRAGE POSITION ROBOT NO 1 

170 PXR2=36:PYR2=21" POSITION DEPART ROBO 


T NO 2 

180 FEN 2:LOCATE PXRI1,PYRI:PRINT CHR$(33 
:LOCATE PXR2,PYR2:PRINT CHR$(33)’AFF RO 

BOTS AU DEPART 

190 FOR N=0 TO 50:1=INT((33-PXR1 ) XRND) +P 

XR1-1:J=INT((21-PYR1)/(36-PXR1)X(1-PXR1) 
)+INT((SXRND-2)#(1-PXR1)/8)+PYR1+1 

200 IF J>PYRI-2 THEN 220 
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Z10 J=PYRI-1:GOTO0O 240 

220 IF J<>PYR1 THEN IF J<22 THEN 240 ELS 
E J=21:GOTO 240 

230 IF I<>PXRI THEN 240 ELSE J=PYRI- 


1 
240 PEN 1:LOCATE I,J:PRINT"=""AFF PILIER 
250 C(I1,J3)=1:NEXT'’REPRESENTATION PILIER 


260 FXA=PXR1:PYA=PYR1:PPXA=PXA:PPYA=PYA? 
MISE EN BOUCLE DU ROBOT NO1 (ACTIF) 

270 PXP=PXR2:PYP=PYR2’MISE EN BOUCLE DU 
ROBOT NO2 (PASSIF) 

280 DIM PX(100),PY(100)’LISTES DES COORD 
ONNEES SUCCESSIVES DES DEUX ROBOTS (INDI 
CES IMPAIRS POUR ROBOT NO 1,PAIRS POUR R 
OBOT NO 2) 

290 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
KT’TOP DEPART 

1000 REM BOUCLE DES MOUVEMENTS 


1010 FOR M=1 10 

1020 TERR$= INKEYS : ÎF TERR#=" " THEN 110’ 
CHANGMT FERRÉ EVENTUEL 

1030 PEN 1:LOCATE 31,2:PRINT Mj" "’AFF C 
OMPTEUR 


1040 REM HEURIST NAV (1) 
1050 IF PXA<>PXP THEN NUME=ABS (PYA-PYP): 
DENO=ABS (PXA-PXP) : IN=NUME/DENCO ELSE 1080 


1060 IF IN<O.S THEN VXA=SGN(PXP-PXA):VYA 
=0:GOTO 1090 
1070 IF:IN>2 THEN VXA=O:VYA=SGN(PYP-PYA) 
: GOTO 1090 
1080 VXA=SGN(PXP-PXA):VYA=SGN(PFYP-PYA) 
1090 TT=O’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN PILIER 
1100 PXA=PPXA+VXA: PYA=PPYA+UYA 

10 IF PXA>231 THEN 1130 ELSE GOSUB 3000 
120 IF OBS=1 THEN 1100 

O IF M/2=INT(M/2) THEN PER=30 ELSE PE 


0 
O0 PEN 3:LOCATE PPXA,PPYA:PRINT CHRS(3 
: PEN 2: LOCATE PXA,PYA:PRINT CHRS (33) : S 
ND 1,PER, : PPXAZPXA: PPYA=PY 

50 BRAS LPRA: : PY (M) =PYA’ MEMO POSITIONS 
CCESSIVES DES DEUX ROBOTS 

60 GOSUB 4000’ TEST RENCONTRE DES DEUX 


BOTS 

170 REM INVERSION DES DEUX ROBOTS 

1180 PXANOUV=PXP : PYANOUV=PYP:PXP=PXA:PYP 
Fe A 1 NOCMaEMRRE MANONNERERASRESAPE 
1190 FOR N=1 TO SO:NEXT:NEXT M 

1200 REM REEXECUTION DU PARCOURS 


me eOWe TEE Es 
OmCel-hlirmmh 


— 125 — 


1210 GOSUB 5000 

1220 REM RENVOI A NOUVEAU PARCOURS 
1230 FOR AT=1 TO 1000:NEXT:GOTO 110 
1240 END 


2000 REM ZONE DES SOUS-PROGRAMMES 
3000 REM_ SSPROG HEURT PILIER 
3010 OBS=0: TT=TT+1 

3020 1F CTPXA, PYA)<>1 THEN RETURN 
3030 FOR AT=1 TO 150:NEXT:SOUND 1,24 7 
::PEN 2:LOCATE PXA; PYA:PRINT"X":FÜR ÀT= 
“TO SO:NEXT:PEN 1:LOCATE PXA,PYA: PRINT"= 


3040 REM HEURIST DE DEGAGMT (C):TIRAGE A 
U SORT 1ERE DIRECTION DE DEGAGEMENT, PUIS 
EN CAS D’INSUCCES,EXPLORATION ORDORNEE 

ÈS AUTRES DIRECTIONS 

3050 FOR AT=1 TO 80:NEXT:IF TT=1 THEN HA 
SINTISRRND+1) 1166 ENT DERND) : GOTU 3090 

5060 IF SS=0 THEN HAS=HAS+1::1F HAS<9 TH 

EN 3090 ELSE HAE HAS-8:GOTO 3090 

3070 HAS=HAS-1:IF HAS)0 THEN 3090 

3080 HAS=HAS+8 

3090 IF HAS=1 THEN 3100 ELSE IF HAS=2 T 

HEN 3110 ELSE IF HAS=3 THEN 3120 ELSE IF 

HAS=4 THEN 3130 ELSE IF HAS=5 THEN 3140 

ELSE IF HAS=6 THEN 3150 ELSE IF HAS=? T 

EN 3160 ELSE 3170 


H 

3100 VXA=1: VYA=1: GOTO 3180 
3110 VXA=1:VYA=O: GOTO 3180 
3120 VXA=1: VYA=-1: GOTO 3180 
3130 VXA=O0O: VYA=-1: GOTO 3180 
3140 VXA=-1:VYA=-1: GOTO 3180 
3150 VXA=-1: VYA=O0: GOTO 3180 
3160 VXA=-1: VYA=1:GOTO 3180 
3170 VXA=O:VYA=I 

3180 OBS=1 

3190 RETURN 

RE REM SSPROG RENCONTRE DES DEUX ROBOT 
4 


010 IF PXA<>PXP THEN RETURN ELSE IF PYA 
{>PYP THEN RETURN 

4020 PEN 1: oo Ha. PYA:PRINT CHR$(33) 
4030 FOR FOIS= 4 : SOUND 1,27393/:FOR 
AT=i TO 1003 NEXT: INEXT: FOR AT=1 0’ 2000:N 


4040 MRENC=M’MEMO NO BOUCLE DE LA RENCON 


4050 FEN 3:LOCATE PXA,PYA: PRINT CHR$ (33) 
AFF TRACE AU POINT DE RENCONTRE 
4060 M=100’ SORTIE BOUCLE DES MOUVEMENTS 
4070 RETURN 

5000 REM SSPROG REEXECUTION 

5010 FOR FOIS=1 TO 3:SOUND 1,20,5,7:FOR 
AT=1i TO 100: NEXT NEXT:PEN 2:LOCATÉ PXRI, 
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PYRL:PRINT CHR$(33) :LOCATE PXR2,PYR2:PRI 
NT CHR#(33):FOR AT=i TO 2000:NEXT'REAFF 

ROBOTS AU DEPART 

5020 FOR M=1 TO MRENC 

5030 IF M/2=INT(M/2) THEN PER=30 ELSE PE 
5040 IF M=1 THEN PEN 3:LOCATE PXRI1,PYR1: 
PRINT CHR$(33):GOTO 5070 

5050 IF M=2 THEN PEN 3:LOCATE PXR2,PYR2: 
PRINT CHR$ (33) :GOTO 5070 

3060 PE PEN 3:LOCATE PX(M-2) ,PY(M-2) : PRINT 

5070 PEN 2:LOCATE PX(M),PY(M):PRINT CHRS& 
(33) : SOUND 1,PER, 5,7 

5080 NEXT M 

5090 FOR AT=1 TO 300:NEXT:PEN 


1:LOCATE P 
X (MRENC) ONDES Se CHRS (33) :FOR FO 
IS=1 KE rt 518:93/:FOR AT=1 TO 100 


: NEXT:N 
95100 HRENC= O: RETURN 


Commentaires techniques 


Par rapport à E16, la nouveauté réside dans l’utilisation de deux tableaux 
PX(100) et PY(100), préalablement dimensionnés chacun à 
100 éléments à l’aide de l’instruction DIM. 


Ces tableaux prennent en charge les coordonnées successives PX(M) 
et PY(M) à chaque boucle de rang M. 


À l'issue du parcours, le sous-programme ‘‘rencontre des deux robots’’ 
mémorise le rang MRENC de la boucle où a eu lieu la rencontre et 
provoque la sortie de la boucle (M = 100). 


Puis le sous-programme réexécution procède à la reconstitution très 
rapide du parcours en dévidant et en affichant les positions précédem- 
ment mémorisées. 
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VII 


LE PASSÉ AU SERVICE DU PRÉSENT — 
L'APPRENTISSAGE 


‘‘Le temps est un grand maître ; le malheur est qu’il 
tue ses élèves.”” 


H. BERLIOZ. 
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Les deux robots ont commencé à prendre conscience, en E20, qu'un 
peu de concentration alliée à une bonne mémoire permettent de dimi- 
nuer la peine et de faire le travail plus vite. 

En effet, les tâtonnements du premier essai sont supprimés, le chemi- 
nement est sûr, mais cela s’arrête là : la qualité du parcours n'est pas 
améliorée, les écarts et les retours en arrière sont rigoureusement et stu- 
pidement restitués au second. 

Or, nos parents et nos maîtres nous ont dit que l'apprentissage avait 
une portée bien supérieure à celle du simple fil d'Ariane : apprendre 
certes, mais aussi trier, éliminer, oublier pour faire mieux et plus vite. 

Maintenant, Roméo va redevenir sérieux et solitaire, la solitude étant 
surtout destinée à simplifier le programme. Dans de très modestes limi- 
tes, car les mécanismes de l’apprentissage sont complexes et subtils, nous 
allons dans les trois prochaines étapes affiner le comportement de E20, 
puis déboucher en E24 sur une curieuse méthode d'apprentissage dans 
laquelle le robot compte sur son créateur pour l’aider à mieux faire, soli- 
darité et noblesse obligent. 
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ÉTAPE E21 
SÉPARER LE BON GRAIN 


Présentation 


Le robot ne se contente plus de restituer le seul parcours qu'il a effec- 
tué. Il réalise cinq parcours complets différents sur le même terrain; les 
heuristiques utilisées sont 1 et G. Le rang du parcours et le temps (c’est- 
à-dire le nombre de pas) sont décomptés et affichés à l'écran. 

À la fin de chaque parcours, le robot compare sa performance à la meil- 
leure des précédentes. S’il a progressé, il oublie l’ancien record et retient 
le nouveau. Si par contre il n’a pas fait mieux, il oublie son dernier 
parcours. 

Lorsqu'il a terminé les cinq parcours, Roméo réexécute au pas de charge 
la meilleure de ses prestations. 

Les différences de qualité des parcours, c’est-à-dire de temps, sont certes 
uniquement dues au hasard : on sait que l’heuristique de dégagement G 
laisse à ce dernier une place de choix. 

Mais il arrive dans la vie que l’on progresse de cette façon. De nom- 
breuses grandes inventions ou découvertes ont ainsi vu le jour car le hasard 
est le plus grand créateur de variété, bonne ou mauvaise, que l’on 
connaisse. 

Il faut d’ailleurs être conscient qu’en ce domaine le hasard ne suffit 
pas, il faut en outre : 


+ que l'observateur soit psychologiquement en quête de quelque chose ; 
+ que l'événement soit potentiellement fécond ; 


e que le chercheur le reconnaisse comme tel et se l’approprie. 

Avec de la patience, simulable dans le programme par une augmen- 
tation à volonté du nombre de parcours d’essai, le résultat est surpre- 
nant : on peut arriver à un parcours final d’une grande pureté. 


Programme 


100 ’ETAPE E21:ROBOT CHERCHANT SON MAITR 
E DANS LABYRINTHE, 70 PILIERS, HEURISTIQUE 
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DE NAVIGATION (1),HEURISTIQUE DE DEGAGE 
MENT (G),5 PARCOURS SUR MEME TERRAIN, CHO 
IX DU MEÎLLEUR ET REEXECUTION 
110 INK O,19:INK 1,6:INK 2,1:INK 3,17:CL 
S: CLEAR 
120 DIM Ci32,25)'TABLEAU DES COORDONNEES 

DES CASES DÉ L'ECRAN SUSCEPTIBLES DE RE 
CEVOIR UN PILIER 
130 DIM PXR(80),PYR(80)' DOUBLE LISTE DES 

COORDONNEES SUËCESSIVES DU ROBOT | 
140 DIM PXRBIS (80) ,PYREIS(80)’DBLE LISTE 

DES COORD DU MEILLEUR PARCOURS 
150 SYMBOL AFTER 32:SYMBOL 33,RO0,&7C,kDé 
1k6C,&38,RFE, &7C, &GC’ DESSIN ROBOT; DESSIN 

MAITRE : ÉODE 250 
160 MT=80:MOB=-2: RGP=1'INITIALISATION PA 
RAMETRES DIVERS 
170 ’NOMBRES ALEATOIRES VARIES 
180 RANDOMIZE TIME 
190 PXR(0)=36:PYR(0)=21' POSITION ROEOT A 
Ü DEPART 
200 CLS:H=INT(2XRND):1F H=1 THEN PXM=INT 
(25XRND+6) :PYM=6 ELSE PXM=6:PYM=INT(12XR 
ND+6)’TIRAGE POSITION MAITRÉ 
210 PEN 1:LOCATE PXR(O),PYR(O):PRINT CHR 
$(33):PEN 2:LOCATE FXM,PYM:PRINT CHR$(25 


220 PEN 2:LOCATE 25,1:PRINT"NO PARCOURS: 
":LOCATE 25,3:PRINT'MEILL TEMPS:" 

230 IF RGP>)1 THEN 310 

240 FOR N=1 TO ?70:I=INT((33-PXM)XRND) +PX 

M-1:J=INT((21-PYM)/(36-PXM)X(I-PXM))+INT 
((SXRND-2) #(1-PXM) /8) +PYM+1 

250 IF J>PFYM-2 THEN 270 

260 J=PYM-1:GOTO 290 

270 IF J<>PYM THEN IF J<22 THEN 290 ELSE 
J=21:GO0OT0 290 

280 IF I<>PXM THEN 290 ELSE J=PYM-1 

290 PEN 1:LOCATE I,J:PRINT"="’AFF PILIER 

300 C{1,J)=1:NEXT'REPRESENTATION PILIER 

310 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 

XT'TOP DEFART 

320 PEN 2:LOCATE 37,1:PRINT RGP 

1000 REM BOUCLE DES’ MOUVEMENTS 

1010 FOR M=1 TO 80 


1020 TERR$S=INKEY#S:1F TERR$=" " THEN 110? 
CHANGMT DE TERRAIN 

1030 PEN 2:LOCATE 31,24:PRINT M5"  "?AFF 
COMPFTEUR 


1040 REM HEURIST NAV (1) 

1050 REM HEURISTIQUE DE DEGMT (G):SI HEU 
RT A BOUCLE M=MOB,REPETITION DU MM MOUVM 
T A BOUCLE MOB+1 

1060 IF PXR(M-1)<>PXM THEN NUME=ABS (PYR( 
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M-1) -PYM) :DENO=ABS (PXR(M-1) -PXM) : IN=NUME 
/DENG ELSE 1090 

1070 Le IN(O.S THEN VXR=SGN(PXM-PXR(M-1) 
}): VYR=O: GOTO 1100 

1080 IF IND2 THEN VXR=O: VYR=SGN(PYM-PYR( 
M-1)):GOT0 1100 

on PAPER CRE RME ESRARE ESA RE SSP ENTER 
1100 TT=O’INITIALISATION DU RANG TT DES 

TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN A PE 

1110 IF M<>MOB+1 THEN 113 

1120 PXR(M)=PXR(M- TT UXROB: PYR(M)=PYR(M- 
1) +VYROB: GOTO 1140 

130 PXR(M)=PXR(M-1) +VXR: PYR(M)=PYR(IM-1) 


YR 

40 IF PXR(M)>31 THEN 1160 ELSE GOSUB 3 
O’ TEST Enr PILIER 

90 IF OBS=1 THEN 1130 

60 PEN 3: LOCATE PXR(M-1),PYR(M-1):PRIN 
CHR$(33) : PEN 1: LPS BXR (M) , PYR CH) 3 PR 
T CHRS (33) : SOUND l;, 

70 GOSUR 4000’TEST "HAETRÉ REJOINT 

(e) N=i TO 80: NENE EXT M 

Le 6_SOUND 1,500,40, FGOTO 4080° PARCOURS 


1200 END 

2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG HEURT PILIER 

3010 OBS=0: TT=TT+ 

3020 IF CUBXR UM) à PYR (ML). THEN. RETURN, 
3030 FOR AT=1 TO'150:NEXT:SOUND 1, 

: PEN 2:LOCATE PNR LMD; PVR LR 2PRANE LES E EDR 
AT=1 TO SO:NEXT:PEN 1:LOCATE PXR(M),PYR 
(M): PRINT"=" 

3040 REM HEURISTIQUE DE DEGAGEMENT (G):T 
IRAGE 1ERE DIRECTION DE DEGAGMT PUIS,EN 
CAS D’INSUCCES, EXPLOITATION ORDONNÉE DES: 
AUTRES DIRECIONS 

3050 FOR AT=i 70° 100:NEXT AT:IF TT=1 THE 
N HAS=INT (8XRND+1) : SS=INT (2XRND) :GOTO 30 


90 

3060 IF SS=0 THEN HAS=HAS+1::1F HAS<9 TH 
EN 3090 ELSE HAS=HAS-8:GOTO 3090 

3070 HAS=HAS-1:1IF HAS>O THEN 3090 


3090 IF HAS=1 THEN 3100 ELSE IF HAS=2 
HEN 3110 ELSE IF HAS=3 THEN 3120 ELSE I 
HAS=4 THEN 3130 ELSE IF HAS=S THEN 314 
ELSE IF HAS=6 THEN 3150 ELSE IF HAS=?7 
EN 3160 ELSE 27 

00 VXR=1:VYR=1:GOTO 3180 

10 VXR=I:VYR= Ô: GOTO 3180 

20 VXR=I1:VYR=-1: GOTO 3180 


bts bte bee =) be pre Oh + be 
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3130 VXR=O: VYR=-1: GOTO 3180 

3140 VXR=-1: VYR=-1: GOTO 3180 

3150 VXR=-1: VYR=0: GOTO 3180 

3160 VXR=-1: VYR=1: GOTO 3180 

3170 VXR=O: VYR=1 

3180 OBS=1:MOB=M’MEMO NO BOUCLE 

31970 VXROB=VXR: VYROB=UYR’MEMO VITESSE PO 


UR BOUCLE SUIVANTE MOB+1 

3200 RETURN 

4000 REM SSPROG MAITRE REJOINT 

4010 IF PXR(M)<>PXM ps RETURN ELSE IF 

PYR(M)<>PYM THEN RETUR 

EDS 2:LOCATE BXR EM) , PYR (M) : PRINT CH 

4030 FOR SOTRE 1 10 us PRES 1,27,93/:FOR 
AT=1 TO 10O0O:NEXT: 

4040 REM CHÜTX MÉTLLEUR PARCOURS 

4050 IF El THEN 4080 ELSE MT=M:PEN 2:L 
OCATE 37,3:PRINT MT 

4060 REM' HE MO MEILLEUR PARCOURS 

4070 FOR M=0 TO MT:PXRBIS(M)=PXR (M) :PYRE 
IS(M)=PYR(M):NEXT M 

4080 RGP=RGP+1:PEN 1:LOCATE PXR(O),PYR(O 
):PRINT CHR$(33):PEN 2:LOCATE PXM, PYM: PR 
INT PRE AS DEA SES THEN 230 

4090 PEN 1:LOCATE 38,1:PRINT"FIN" 

4100 REM RÉEXECUT 1 N° DÙ MEILLEUR PARCOUR 


S 

4110 FOR AT=1 TO 2000:NEXT :FOR FGIS=1 T 

O 4:SOUND 1,40,5,7:FOR AT=1 TO 100:NEXT: 

NEXT:FOR AT=<1 0 1000:NEXT 

4120 FOR M=1 MT:PEN 1:LOCATE PXRBIS(M 
À, ÉTRELS (RD 2PRINT CHRS (33) : SOUND 1,16,2, 

7:FOR AT=1 TO 6O:NEXT:NEXT M 

4130 PEN 2: LOCATE PXM PYM; SPRINT CHRS (33) 

:FOR FOIS=i TO 4:SOUND 1,30,5,7:FOR AT=1 
TO 100:NEXT:NEX Ki 

4140 FOR AT=1 TO 2000:NEXT:GOTO 110 


Commentaires techniques 


e On prépare, en amont de la boucle des mouvements, non seulement 
les deux tableaux indicés PXR(80) et PYR(80) de mémorisation des 
positions de chaque parcours comme en E20, mais aussi deux tableaux 
PXRBIS(80) et PYRBIS(80) de mémorisation des positions du ei 
leur parcours. 


e On prépare également l'affichage, en haut et à droite de l'écran, du 
rang du parcours et du meilleur temps (nombre de pas). 
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e Dans la boucle des mouvements, on affiche le décompte des pas (hor- 
loge) au fur et à mesure du déroulement du parcours. 


e C’est le sous-programme maître rejoint qui procède à la comparaison 
des performances et qui retient la meilleure en transvasant les posi- 
uons PXR(M) et PYR(M) dans les tableaux PXRBIS(M) et PYRBIS(M). 


e C’est également ce sous-programme qui, à l’issue du cinquième par- 
cours, assure la réexécution en fanfare du meilleur d’entre eux. 
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ÉTAPE E22 
NE PAS PERSISTER DANS L'ERREUR 


Présentation 


Roméo va franchir un second niveau dans la conception de son appren- 
tissage. 

Au lieu d'effectuer complètement chacun des cinq parcours d’essai, 
il surveille en permanence l'horloge et interrompt le trajet en cours dès 
que le temps écoulé atteint celui du meilleur parcours déjà réalisé. 

Cela économise du temps et allège la mémoire mais nécessite par contre 
un regard permanent sur l’horloge et sur le meilleur temps. 

Ces résultats et cette double opération mentale sont fidèlement tra- 
duits dans le programme ci-après. 


Programme 


100 ’ETAPE E22:COMME E21,AVEC INTERRUPTI 
ON D'UN PARCOURS DES QUE SON TEMPS DEPAS 
SE CELUI DU MEILLEUR PRECEDENT 

110 INK 0,17:INK 1,0:INK 2,6:INK 3,26:CL 
120 DIM C(32,25)’TABLEAU DES COORDONNEES 
DES CASES DE L'ECRAN SUSCEPTIBLES DE RE 
CEVOIR UN PILIER 

130 DIM PXR(80) ,PYR(80)’ DOUBLE LISTE DES 
COORDONNEES SUËCESSIVES DU ROBOT 

140 DIM PXRBIS(80),PYRBIS (80) ’DBLE LISTE 
DES COORD DU MEILLEUR PARCOURS 

150 SYMBOL AFTER 32:SYMBOL 33,k0,&k7C,&D6 
,&6C,&38,RFE, &7C,&6C’ DESSIN ROBOT; DESSIN 
MAITRE : ÉODE 250 

160 MT=80:MOB=-2:RGP=1:MMAX=79" INITIALIS 
ATION PARAMETRES DIVERS:MEILL TEMPS MT,N 
O BOUCLE -HEURT PILIER MOB,RANG DU PARCOU 
RS RGP,POTENTIEL MAXI BOUËLES MMAX 

170 ’NÜMBRES ALEATOIRES VARIES 

180 RANDOMIZE TIME 

190 PXR(0O)=36:PYR(0)=21’ POSITION ROBOT A 
U DEPART 

200 CLS:H=INT(Z2XRND):IF H=1 THEN PXM=INT 
(25XRND+6) :PYM=6 ELSE PXM=6:PYM=INT (12XR 
ND+6)’TIRAGE POSITION MAITRE 

210 PEN 1:LOCATE PXR(O) ,PYR(O):PRINT CHR 
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$(33):PEN 2:LOCATE PXM,PYM:PRINT CHR$(25 
O)°AFF ROBOT ET MAITRE’ 

220 PEN 2:LOCATE 25,1:PRINT*NO PARCOURS: 
": LOCATE 25,3:PRINT'MEILL TEMPS:" 

230 IF Ras) 1” THEN 310 
240 FOR N=1 TO 70: I=INT((33-PXM) XRND) +PX 

0: CENT I2ie PÉA CSS LENS CE RD) 2 L EX 
CISRRNDO DIET LE PXM) 78 PME 

250 IF J>PYM-2 THEN 270 

260 J=PYM-1:GOTO 290 

270 IF J<>PYM THEN IF J<22 THEN 290 ELSE 
1=21:GOT0 290 

280 IF I<>PXM THEN 290 ELSE J=PYM- 

290 PEN 1:LOCATE RINT = AE PILIER 

200 CtI SET CNEST’ * REPRÉSENTATION PILIER 

310 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 

XT'TOP DEPART 

320 PEN 2:LOCATE 37,1:PRINT RGP 

+890! REM BOUÈLE DES’ MOUVEMENTS 

1010 FOR M=1 TO MMAX 


1020 TERRS=INKEY#S: IF TERR$=" " THEN 110” 
CHANGMT DE TERRAIN 
1030 PEN 2:LOCATE 31,24:PRINT Miÿ"  "?’AFF 


TEUR 
1040 REM HEURIST NAV (1) 
1050 REM HEURISTIQUE DE DEGMT (G):SI HEU 
RT A BOUCLE M=MOB,REPETITION DU MM MOUVM 
T A BOUCLE MOB+1 
1060 IF PXR(M-1)<2>PXM THEN NUME=ABS (PYR( 
M-1)-PYM) : DENO=ABS (PXR (M-1) -PXM) : IN=NUME 
/DENO ELSE 1090 
1070 IF IN<O.S THEN VXR=SGN(PXM-PXR(M-1) 
): VYR=O: GOTO 1100 
1080 IF IN>2 THEN VXR=O:VYR=SGN(PYM-PYR( 
M-1)):GOTO0 1100 
Son NS ON SPA RARES VTRESONNEURSE 
1100 TT=O*INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIE 
RE APRES AVOIR HEURTE rh A EE 
1110 IF M<>MOB+1 THEN 
1120 PXR(M)=PXR(M- TT FUXROB: PYR(M)=PYR(M- 
) +VYROB: GOTO 1140 
130 PXR(M)=PXR(M-1) +VXR: PYR(M)=PYRIM-1) 


40 IF PXR(IM)>31 THEN 1160 ELSE GOSUB 3 
O’TEST HEURT PILIER 

50 IF OBS=1 THEN 1130 

60 PEN 3:LOCATE PXR(M-1),PYR(M-1):PRIN 
CHR& (33) : PEN 1 :LOCATE BXR (M) , PYR (M) :PR 
T CHR$(33) : SOUND 1, 

70 GOSUB 4000’ TEST » SAÉTRE REJOINT 

80 POR N=1 TO SO: NEXT:NEXT M 


O REM INTERRUPTION PARCOURS RATE (M>M 
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MAX) ET RETOUR DU ROBOT AU DEPART 

1200 FOR FOIS=1 TO 3:SOUND 1,40,5,7:FOR 

AT=1 TO 100:NEXT:NEXT FOIS 

1210 FOR M=MMAX-1 TO O STEP-1:SOUND 1 

0,5,7:PEN_1:LOCATE BR (63 PyRine TR D r ht Q 

HRS(33) :PEN 3:LOCATE PXR (M4 1) PVR ep 
NT CHRS(33) FOR AT=1 TO 70:NEXT:NEXT M 

20 REM RENVOI À UN NOUVEAU FARCOURS 

30 FOR AT=1 TO S5O0OO0:NEXT:GOTO 4110 

00 REM ZONE DES SOUS- PROGRAMMES 

3000 REM SSPROG HEURT PIL 

3010 OBS=0:TT=TT+1 

3020 IF CIPXR EM) 3 PYR EMI) 61 THEN RETURN, 

3030 FOR AT=1 TO'150:NEXT:SOUND 1,2 

:PEN 2:LOCATE PXR LP 3 PYR (D 2: PRINTUE" ! EDR 

(AT=1 10 50; NEXT:PEN 1:LOCATE PXR(M) ,PYR 

3040 RÈM HEURISTIQUE DE DEGAGEMENT (G):T 

IRAGE 1ERE DIRECTION DE DEGAGMT PUIS, EN 

CAS D’ INSUCCES,EXPLOITATION ORDONNÉE DES 
AUTRES DIRECIONS 

2050 FOR AT=i T0” 100:NEXT AT:IF TT=1 THE 

N HAS=INT (8XRND+1) : SS=INT (2XRND) :GOTO 30 


90 

3060 IF SS=0 THEN HAS=HAS+1::1F HAS<9 TH 

EN _3090 ELSE HAS=HAS-8:GOTO 3090 

3070 HAS=HAS-1:1F HAS>0O THEN 3090 

3080 HAS=HAS+8 

3090 IF HAS=1 THEN 3100 ELSE IF HAS=2 T 
HEN 3110 ELSE IF HAS=3 THEN 3120 ELSE IF 
HAS=4 THEN 3130 ELSE IF HAS=5 THEN 3140 
ELSE IF HAS=6 THEN 3150 ELSE IF HAS=7 T 

HEN 3160 ELSE 3170 

VXR=1:VYR=1:GOTO 3180 

VXR=Ii:VYR=0O:GOTO 3180 

VXR=1: VYR=-1:GOTO 3180 

VXR=O: VYR=-1:GOTO 3180 
VXR=-1:VYR=-1: GOTO 3180 

VXR=-1:VYR=0O:GOTO 3180 
VXR=-1:VYR=1:GOTO 3180 

VXR=O:VYR=1 

OBS=1:MOB=M’MEMO NO BOUCLE 

O VXROB=VXR: VYROB=UYR’'MEMO VITESSE PO 
UR BOUCLE SUIVANTE MOB+1 

3200 RETURN 

4000 REM SSPROG MAITRE REJOINT 

4010 IF PXR(M)<>PXM THEN RETURN ELSE IF 

PYR(M)<>PYM THEN RETURN 

4020 REM LE PRESENT PARCOURS EST AU MOIN 

S AUSSI BON QUE LE MEILLEUR (SINON IL AU 
RAIT ETE INTERROMPU) 

4030 MT=M 

4040 PEN 2:LOCATE PXR(M),PYR(M):PRINT CH 


CU) Ci Gi C0 Gi) C2 CO UD 
He bee be be be be He be 
NOUIBONE- © 
00000000 


(es) 
[= 
Dep 
[e) 
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R$(33) 
4050 FOR FOIS=1 TO 4:SOUND 1,27,5,7:FOR 
AT=1 TQ 100: NEXT: N NEXT 
4060 PEN 2:LOCATE 37,S3:PRINT MT 
4070 REM MÉMO MEILLEUR PARCOURS 
4080 FOR M=0 TO MT:PXRBIS(M)=PXR (M) :PYRB 
IS(M)=PYR(M):NEXT M 
4090 REM ABAISSEMENT POTENTIEL BOUCLES 
4100 MMAX=MT 
O RGP=RGP+1:PEN 1:LOCATE PXR(O),PYR(O 
RINT CHRS (39) à PEN 2:LOCATE PXM, PYM:PR 
CORAN SReAE ROËSS THEN 230 

EN 1:LOCATE 38,1:PRINT"'FIN" 
[e) REN RÉEXECUTION" DÙ MEILLEUR PARCOUR 


0 FOR AT=1 TO 2000: NEXT :FOR FOIS=1 T 
: SOUND ,40 5,7:FOR ATz1 TO 100:NEXT: 
T:FOR aT£ fo’ 1000 £ NEXT 

G'EOR Me TO MTSPEN TeLOCATE PXRBIS (M 
,PYRBIS (M): PRINT RS (335 PÉGUND 1,16,2, 
?FOR AT=1 TO 6O:NEXT:NEXT M 

160 PEN 2:LOCATE PXM,PYM:PRINT CHR$1(33) 
:FOR FOIS=1 TO 4:SOUND 1,30,5,7:FOR AT=1 
TO 100:NEXT:NEXT 

4170 FOR AT=i TO 2000:NEXT:GOTO 110 


M] be bmp Zeutk 


EN-BZOBOEERH-S 
vuxses re 


Commentaires techniques 


L’interruption d’un parcours dépassant le meilleur temps MT est obte- 
nue à l’aide du paramètre MMAX qui représente le nombre maximal 
de boucles admissibles et que l’on place donc en argument du début 
de boucle FOR. Au départ du premier parcours, MMAX est initialisé 
à 79. Ensuite MMAX est égalisé au meilleur temps MT. 


Lorsque le potentiel des boucles est épuisé, c’est-à-dire si le robot n’a 
pas rejoint son maître au meilleur temps MT (M supérieur à MMAX), 
le programme sort de la boucle, le robot revient sur ses pas et entre- 
prend un nouvel essai. 


Noter que tout parcours terminé est forcément, avec cette méthode, 
au moins aussi bon que le meilleur précédent. Il n’est donc pas néces- 
saire de faire le tri comme en E21; le tri s’est fait par élimination en 
cours de trajet. 


Après chaque parcours réussi, MMAX est mis à jour : MMAX = MT. 
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ÉTAPE E23 
DEVANCER L'ERREUR 


Présentation 


Dernier échelon possible dans l’économie du temps et de la mémoire, 
Roméo, dans chacune de ses cinq courses contre la montre, n’attend pas 
le moment où il a effectivement perdu pour interrompre son parcours. 
Il surveille, non seulement l’horloge et le meilleur temps, mais aussi son 
maître et la distance qui lui reste à parcourir. 

Il peut en déduire à chaque pas le temps que, dans le meilleur des 
cas (plus d'obstacles à contourner), il pourra réaliser. Il anticipe ainsi sur 
ses chances et renonce dès que l’espoir de faire mieux s’envole. 

L'efficacité de cette démarche se paie bien sûr par des manipulations 
supplémentaires d'informations. 


Programme 


100 ’ETAPE E23:COMME E22,AVEC INTERRUPTI 
ON ANTICIPEE D'UN PARCOURS DES QUE SON T 

EMPS NE PEUT PLUS ETRE EGAL OÙ INFERIEUR 
A CELUI DU MEILLEUR PRECEDENT, COMPTE-TE 

NU DE LA DISTANCE RESTANT À PARCOURIR 
110 INK 0,175 INK 1,0:INK 2,6:INK 3,26:CL 
120 DIM C(32,25)’TABLEAU DES COORDONNEES 
DES CASES DE L'ECRAN SUSCEPTIBLES DE RE 
CEVOIR UN PILIER 

130 DIM FXR(80) ,PYR(80)’DOUBLE LISTE DES 
COORDONNEES SUECESSIVES DU ROBOT 

140 DIM PXRBIS(80),PYRBIS(80)’'DBLE LISTE 
DES COORD DU MEILLEUR PARCOURS 

150 SYMBOL AFTER 32:SYMBOL 33,&0,&7C,&D6 
LéC,R38,8FE, &7C,&6C’ DESSIN ROBOT; DESSIN 
MAITRE : CODE 250 
160 MT=80:MOB=-2: RGP=1:MMAX=79"INITIALIS 
ATION PARAMETRES DIVERS:MEILL TEMPS MT,N 

O ÉQOUCLE HEURT PILIER MOB,RANG DU PARCOU 
RS RGP,POTENTIEL MAXI BOUËLES MMAX 

170 ’NÔÜMBRES ALEATOIRES VARIES 

180 RANDOMIZE TIME 

190 FXR(0)=36:PYR(O)=21 POSITION ROBOT A 

Ü DEPART 

200 CLS:H=INT(2XRND):IF H=1 THEN PXM=INT 
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(25XRND+6) :PYM=6 ELSE PXM=6:PYM=INT (12%XR 
ND+6)’TIRAGE POSITION MAITRE 

210 PEN 1: LOCATE PXR(O),PYR(O):PRINT CHR 
$(33):FEN 2:LOCATE PXM,PYM:PRINT CHRS (25 
O)°AFF ROBOT ET MAITRE” 

220 PEN 2: LOCATE 25,1:PRINT'NO PARCOURS: 
":LOCATE 25,3:PRINTPMEILL TEMPS: 

230 IF RGP 1 THEN 310 

240 FOR N=1 TO 70:I=INT((33-PXM)XRND) +PX 
M-1:J=INT((21-PYM)/(36-PXM)XCI-PXM) )+INT 
((SXRND-2) #(I-PXM) /8) +PYM+1 

250 IF J>PYM-2 THEN 270 

260 J=PYM-1:GOTO 290 


270 IF J<>PYM THEN IF J<22 THEN 290 ELSE 
J=21:GOT0 290 

280 IF I<>PXM TÉES 2. ELSE J=PYM- 

290 PEN 1:LOCATE : PRINT"'=""AFF PILIER 
300 C(I,J)=1:NEXT" * BÉPRESENTATION PILIER 
310 SOUND 1 200, 80,7:FOR AT=1 TO 2OO0O0:NE 

XT’TOP DEPART 

320 PEN 2:LOCATE 37,1:PRINT RGP 

1000 REM BOUCLE DES MOUVEMENT 8 


1010 FOR M=i TO 

1020 TERRS= INREYS: ÎF TERR#&=" " THEN 110? 
CHANGMT DE TERRAIN 

1030 PEN 2:LOCATE 31,24:PRINT M5"  "’AFF 
COMPTEUR 


1040 REM HEURIST NAV (1 

1050 REM HEURISTIQUE DE DEGMT (G):SI HEU 
RT À BOUCLE M=MOB,REPETITION DU MM MOUVM 
T A BOUCLE MOB+1 

1060 IF PXR(M-1)<>PXM THEN NUME=ABS (PYR\ 
M-1)-PYM) : DENO=ABS (PXR(M-1) -PXM) : IN=NUME 
/DENO ELSE 1090 


1070 IF IN<O.5 THEN VXR=SGN(PXM-PXR (M-1) 
):UYR=0:GOTO 1100 

1080 IF IN>2 THEN VXR=0:UVYR=SGN(PYM-PYR( 
M-1)):GOT0 1100 

1070 _VXR=SGN (PXM-PXR (M1) ) : VYR=SGN (PYH-P 
1100 TT=0'INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRÈS AVOIR HEURTE UN 

1110 IF M<>MOB+1 THEN 1120 ELSE PXR(M)= 
XR (= 1) +UXROB : PYR (M) =PYR (M1) +UYROB : GOTO 
1120 PXR (M) =PXR (M1) +UXR: PVR (M) SPYR (M-1) 
+ 

1130 IF PXR(M)231 THEN +150 ELSE GOSUB 3 
000 TEST HEURT PILIER 

1140 IF OBS=1 THEN 1120 

1150 PEN 3:LOCATE PXR(M-1),PYR(M-1) :PRIN 
T CHR$(33):PEN 1:LOCATE PXR(M),PYR(M):PR 
INT CHR$(33) : SOUND 1,30,5,7 
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1160 GOSUB 4000’TEST MAITRE REJOINT 
1170 REM EVALUATION DE LA POSSIBILITE DE 
TERMINER LE PARCOURS DANS LE TEMPS PREC 

EDENT 

1180 NA=MT-M’NA=NOMBRE MAXI ADMISSIBLE D 
E MOUVEMENTS POUR EGALER LA MEILLEURE PE 
RFORMANCE PRECEDENTE 

1190 IF NUME>DENO THEN NN=NUME ELSE NN=D 
ENC’NN=NOMBRE MINI NECESSAIRE DE MOUVEME 
NTS POUR ATTEINDRE LE MAITR 

1200 IF NN< = NA THEN 122 

1210 MI=M:M=MMAX’ MEMO No BOUCLE D’INTERR 
UPFTION Nr ET SORTIE BOU 

1220 IF M=MMAX THEN BEN BÉLOCATE PXR (MI) 
PYR(MI):PRINT CHR$(33) 

1230 FOR N=1i TO 80: NEXT : NEXT 

240 FOR FOIS=1 TO 3:SOUND 1, 20, 5,7:FOR 

f=i TO 100:NEXT: NEXT FOIS 

250 FOR AT=1 TO SOO0:NEXT:GOTO 4110’RENV 
I A UN NOUVEAU PARCOURS 


2000 REM ZONE DES SOUS-PROGRAMMES 
3000 REM SSPROG HEURT PILIER 

3010 OBS=0:TT=TT+1 

3020 IF CUEXR (M), PYR(M))<>1 THEN RETURN, 
3030 FOR AT=1 TO’ 150:NEXT:SOUND 1,24 

: PEN  LOCATÉ PXR UM à PYR UD PRINT ET EDR 
AT=LC T0 50; : NEXT:PEN 1:LOCATE PXR(M) ,PYR 
3040 REM HEURISTIQUE DE DEGAGEMENT (G):T 
IRAGE, 1ERE DIRECTION DE DEGAGMT PUIS, EN 
CAS D’INSUCCES,EXPFLOITATION ORDONNÉE DES 
AUTRES DIRECTIONS 

3050 FOR AT= T0” 100:NEXT AT:IF TT=1 THE 
M HAS= INT CEXRND4 1) 2 SIN (2XRND) : GOTO 30 


3060 IF SS=0 THEN HAS=HAS+1::1F HAS<9 TH 
EN_3090 ELSE HAS=HAS-8:GOTO 3090 

3070 HAS=HAS-1:1F HAS>O THEN 3090 

3080 HAS=HAS+8 

3090 IF HAS=1 THEN 3100 ELSE IF HAS=2 T 
HEN 3110 ELSE IF HAS=3 THEN 3120 ELSE IF 
HAS=4 THEN See ELSE IF HAS=5 THEN 3140 
ELSE IF HAS=6 THEN 3150 ELSE IF HAS=7 T 
EN 3160 ELSE °3176 

VXR=1: VYR=1:GOTO 3180 
VXR=I:VYR=O:GOTO 3180 

VXR=1: VYR=-1: GOTO 3180 

VXR=O: VYR=-1: GOTO 3180 
VXR=-1:VYR=-1: GOTO 3180 
VXR=-1:VYR=0:GOTO 3180 
VXR=-1:VYR=1:GOTO 3180 

VXR=O:VYR=1 

OBS=1:MOB=M’MEMO NO BOUCLE 


O3 O3 C9 0 Gi 0 0 U) WT 
ON UBUNE © 


1 
Î 
1 
1 
1 
1 
1 
1 
1 


0000000000 
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3190 VXROB=VXR: VYROB=VYR’MEMO VITESSE PO 
UR BOUCLE SUIVANTE MOB+1 
3200 RETURN 
4000 REM SSPROG MAITRE REJOINT 
4010 IF PXR(M)<>PXM THEN RETURN ELSE IF 
PYR(IM)<>PYM THEN RETURN 
4020 REM LE PRESENT PARCOURS EST AU MOIN 
S AUSSI BON QUE LE MEILLEUR (SINON IL AU 
RE ETE INTERROMPU) 
4030 MT=M 
4040 F PEN 2Z:LOCATE PXR(M),PYR(M) PRINT CH 
4050 FOR FOIS=1i TO 4:SOUND 1,27,5,7:FOR 
AT=1 TO 100:NEXT: e T 
4060 PÉN 2:LOCATE S: PRINT MT 
4070 REM MEMO MEILLEUR PARCOURS 
4080 FOR M=0 TO Te HN CERN EERRS 
IS (M)=PYR(M) :NEX 
4090 REM ABA i SSEMENT POTENTIEL BOUCLES 
+0 MMAX=MT 

RGP=RGP+1:PEN 1:LOCATE PXR(0),PYR(O 
RINT CHRS (33) : PEN 2: TES PXM, PYM: PR 
COR SEGA RÉ e THEN 230 
O PEN 1:LOCATE 38, : PRINTSEIN 
O REM RÉEXECUT I ON” DÜ MEILLEUR PARCOUR 


1 

N 

1 

Î 

140 FOR de A SÉPLE NEXT :FOR FOIS=1 T 
: FOR AT=1 TO 100:NEXT: 
Eee FOR aT2 2545, 1600: NEAE 
; 
i 
F 
T 
1 


£E en le 


BG EOR Met TO MIS PEN Le LOCATE PXRBIS(M 
PYRBIS (M) 3 PRINT ÉHRS (337 SOUND 1, 16,2, 
IFOR AT=1 TO 60:NEXT:NEXT 

GO PEN 2:LOCATÉ PxH PYM£ PRINT CHRS (32) 
OR FOIS=1 TO 4:SOUND 1 :FOR AT= 

GP 1OO:NEXTINEXT 

4170 FOR AT=1 TO 2000:NEXT:GOTO 110 


se. BN-SZOBOESE TS 


Commentaires techniques 


C’est à chaque pas, en fin de chaque boucle après l’affichage de sa 
position, que le robot procède à l’estimation de ses chances d’amélio- 
rer son score. 


MT étant son meilleur temps précédent, il calcule le nombre maximal 
de pas admissibles NA qu'il lui faut réaliser pour ne pas dépasser son 
meilleur temps : NA = MT-M. 


Il calcule ensuite le nombre de pas nécessaire NN qu’il lui reste à faire 
dans le meilleur des cas (c’est-à-dire en supposant qu’il n’y ait plus 
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aucun pilier sur son chemin) pour rejoindre son maître. C’est la dis- 
tance au sens où nous l’avons déjà définie dans la fonction d’évalua- 
tion de E13. 


e Il ne lui reste plus qu’à comparer NN et NA : si NN est inférieur à 
NA, il continue; sinon il renonce et commence un autre essai. 
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ÉTAPE E24 


UN CURIEUX CONTRAT D'APPRENTISSAGE — 
DIMENSION SOCIALE DE L'INTELLIGENCE 


Présentation 


Roméo se dit qu’il n’a pas demandé à venir sur Terre et qu'après tout 
les hommes ont des devoirs envers lui. 

Il se livre alors à un odieux chantage à l’amour que tout créateur porte 
à ses créatures, et lui demande périodiquement si les résultats qu’il obtient 
sont bons. 

Roméo sait en effet que l'opérateur a un sens de la vue plus développé 
que le sien et qu’il appréhende en particulier l'ensemble des positions 
des piliers, alors que lui-même ne voit que son maître et doit se servir 
d’une canne blanche pour tâter un à un les obstacles. 

Donc, aux trois premiers parcours, il utilise les heuristiques 1 et C puis 
il sollicite une appréciation : ‘C’est bien ?”’ 

Si l'opérateur lui donne une réponse positive, le robot poursuit ses 
trois prochains essais avec la même heuristique 1. Si le verdict est par 
contre négatif, il en change : au premier non, il tord l’heuristique 1 en 
modifiant les valeurs de IN : il se met en somme à ‘‘loucher’’ en rédui- 
sant artificiellement la pente IN, ce qui dévie bien sûr les trajectoires en 
les aplatissant. 

Au deuxième non, il louche dans l’autre sens en augmentant artifi- 
ciellement la pente IN, ce qui infléchit les parcours vers le haut. 

Enfin, au troisième non, Roméo pique une colère et adopte une heu- 
ristique vengeresse et imparable que le lecteur découvrira. 

Puis, heureux et exténué, il s’arrête et prend cavalièrement congé de 
l’opérateur. 

Indépendamment de ces frasques, l’opérateur peut intervenir à tout 
moment sur le déroulement du parcours en utilisant certaines touches 
du clavier : 2 pour obtenir l’heuristique 2, 4 pour l’heuristique 4, H pour 
l'heuristique de dégagement H. Ces deux dernières sont nouvelles et sont 
définies plus loin. 

Ce scénario introduit en fait une idée essentielle qui ne s’est décantée 
que progressivement dans la dernière décennie : un programme intelli- 
gent n’est nullement obligé de fonctionner dans l'isolement. La société 
humaine pose même l’interactivité comme une règle quasi permanente. 

Cet aspect social est maintenant largement exploité, par exemple dans 
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les systèmes experts où l’opérateur joue un rôle essentiel puisque c’est 
lui qui fournit au système les données particulières du cas à traiter (aus- 
cultation du malade, indications sur ses antécédents, etc.) et qui, en sens 
inverse, peut poser des questions au système sur la raison de telle ou telle 
déduction. 

Cela implique d’ailleurs que l’opérateur soit compétent dans le domaine 
concerné. Il s’agit donc bien d’une mise en conjugaison de deux (ou plu- 
sieurs) intelligences, naturelles ou artificielles. 

Par le même moyen d'interactivité, les connaissances générales per- 
manentes du programme peuvent être améliorées : introduction d’un mot 
nouveau dans un répertoire, mise à jour d’une liste de symptômes, adjonc- 
tion d’une règle nouvelle ou exclusion d’une connaissance s’avérant dépas- 
sée, etc. 

Une autre notion d’ordre totalement différent apparaît dans le pré- 
sent exemple. Les heuristiques insufflées au robot reviennent, par le 
comportement général qu’elles suscitent (les temps de réflexion, la sono- 
risation,….), à lui donner un certain caractère. 

Aux réponses positives, Roméo semble content puisqu'il continue sur 
sa lancée. 

Aux réponses négatives, il donne d’abord l'impression d’être re- 
connaissant puisqu'il se plie aussitôt à l’avis qu’on lui donne. 

Au troisième non, par contre, son attitude donne l’image d’une exas- 
pération mal contenue. 

Ainsi l’on peut, par le jeu d’une heuristique et d’un environnement 
de programmation appropriés, restituer à l'opérateur, par le périphéri- 
que de sortie que constitue l'écran, une représentation externe d’un élé- 
ment particulièrement subjectif et abstrait, le caractère du robot. 

Les représentations qualitatives propres à l'I.A. ne sont donc pas à sens 
unique. 


Programme 


100 ‘ETAPE E24:ASS0C ROBOT-OPERATEUR; ROB 
CHERCH MTRE DS LAB,HEUR NAV ET DEGT VAR 
IÉES SUIVANT LES INTERVENTIONS DE L'OPER 
OU LES REPONSES QU’IL DONNE AUX QUEST P 
OSEES FAR LE ROBOT 

SR ER DE DEGT; PAR DEFAUT:(C) ; TOUC 
1530 INK O,10:INK 1,1:INK 2,6:INK 3,23:GL 
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S: CLEAR 
140 SYMBOL AFTER 32:SYMEOL 33,&0,&7C,&Dé 
,RéC,&38,&FE, &7C,kéC’ DESSIN ROBOT; DESSIN 
MAITRE: ÉODE 250 

150 DIM C(31,25)’TABLEAU, DES COORDONNEE 
S DES CASES DE L'ECRAN SÜSCEPTIBLES D'’AV 
OIR UN PILIER 

160 °NOMBRES ALEATOIRES VARIES 

170 RANDOMIZE TIME 

180 :RGP=0:MAL=0'RANG DU PARCOURS ET NOMB 
RE DE REP NON AU ROBOT 

190 CLS:H=INT(Z2XRND):IF H=1 THEN PXM=INT 
(25XRND+6) :PYM=6 ELSE PXM=6:PYM=INT (12XR 
ND+6)’TIRAGE POSITION MAITRE 

200 PEN 2:LOCATE PXM,PYM:PRINT CHRS(250) 
AFF MAITRE 

210 IF RGP<)0 THEN 290 

520 FOR N=i TO 50:1=INT((33-PXM) XRND) +P 

M-1:J=INT((21-PYM)/ (36-PXM)X(1-PXM))+IN 
(CSYRND-2) #CI-PXM) /8) +PYM+1 

230 IF J>PYM-2 THEN 250 

240 J=FYM-1:GOTO 270 

250 IF J(>PYM THEN IF J<22 THEN 270 ELSE 
J=21:G0T0 270 

260 IF I1<>PXM THEN 270 ELSE J=PYM-1 

270 PEN 1:LOCATE 1,J:PRINT"=":C(I,J)=1:N 

EXT N'AFF ET REPRÉSENTATION PILIER 

280 DIM PXR(80),PYR(80)’DBLE TABLEAU DES 

LÉQORDONNEES DES POSITIONS SUCCESSIVES D 

290 FXR(O)=36:PYR(0)=21:PEN 1:LOCATE PXR 
(0),PYR(O):PRINT CHR#(33) POS DEPART ET 

AFF ROBOT 

300 RGP=RGP+1 

310 REM DEMANDE D'APPRECIATION DU RESULT 
AT À L’OPERATEUR PAR LE ROBOT 

320 IF RGP<é4 THEN 360 

330 RGP=1:FEN 1:LOCATE 31,2:PRINT"B?":FO 

R AT=i TO 100:NEXT:LOCATE 3i,2:PRINT"  ” 
340 REPS=INKEYS: IF REP$="0" THEN 360 ELS 
E IF REP#="N" THEN 350 ELSE SOUND 1,50,5 
:5:GOTO 330 

L5O MAL=MAL+1 

360 SOUND 1,200,80,7:FO0R AT=1 TO 2000:NE 
XT’TOP DEPART 

1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=1 TO 80’80 MOUVMTS MAXI ADMIS 
POUR ATTEINDRE LE MAITRE 

1020 PEN 1:LOCATE 36,24:PRINT M 

1080 REM CHOIX EVENTÜEL HEURIST (2),(4) 
1040 HEURS=INKEYS:1F HEUR$="2" THEN 1140 
1050 REM HEURIST NAV (1) 

1060 IF PXR(M-1)<>PXM THEN NUME=ABS (PYR( 


X 
5 


rire 


M- Der PADENCE ABS (PXR(M-1)-PXM) : IN=NUME 
/DENC ELSE 1140 

1070 IF MAL = O THEN 1120 ELSE IF MAL=1 TH 
N 1110 ELSE DE IN THEN 1100 ’ALTERAT 


1080 GOSUB S000’CAS MAL=3 (NON 54 SEME QU 
ESTION DU ROBOT,HEURIST SPECIALE 

SP TACE 1000’FIN DU PARCOURS HEURIST S 
P 

Te ct GOTO 1120’CAS NON À 2EME QU 
ne IN=0.3Y*IN’CAS NON A 1ERE QUEST DU R 


1120 IF IN<O. ve Een VXR=SGN (PXM-PXR(M-1) 
): VYR=O: GOTO 


M-1)):GOT0 1 
cn ve =SGN (PXM-PXR(M-1)) :VYR=SGN(PYM-P 
150 REM CHOIX EVENTUEL HEURIST NAV (4) 
160 IF HEUR#="4" THEN 1170 ELSE 1180 
170 A te te AA 
180 TT=O0’INITIALISATION DU RANG TT DES 
ENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN PILIER 


210 IF OBS=1 THEN 1190 
220 PEN 3:LOCATE PXR(M-1),PYR(M-1):PR 
CHR$ (33) :FEN 1: LOCATE BXR (M) , PYR (M): 
NT CHR# (33) : SOUND 1, 

230 GOSUB 4000’ TEST  SATTRÉ REJOINT 

1240 FOR N=1 TO 80; NEXT: NEXT M 

1250 SOUND 1,1000 :PEN 3:LOCATE PXR( 

M-1),PYR(M-1j: PRIAT thèse na) EDS AT=1 TO 
1399 NEXT : : GOTO 200’PARCOURS RATE 


2608 REM ZONE DES SOUS-PROGRAMMES 
3000 REM SSPROG HEURT PILIER 
3010 OBS=0:TT=TT+1 

3020 IF CAR ED) 3 PUR (MD) DL THEN RETURN, 
3030 FOR AT=1 TO'1S0:NEXT: SOUND 1,24 

: PEN SLOCATÉ PXR (M), PYRUR) SPRINT ER EE DR 
AT=1 256 SO: NEXT:PEN 1:LOCATE PXR(M) ,PYR 
(M): PRINT'=" 

3040 REM HEURISTIQUE DE DEGAGEMENT (C):T 
IRAGE 1ERE DIRECTION DE DEGAGMT PUIS, EN 
CAS D'INSUCCES, EXPLOITATION ORDONNEE DES 
AUTRES DIRECIONS 

3050 FOR AT=i T0” 100:NEXT AT:IF TT=1i THE 
N HAS= INT (SXRND+1):5S= ENT (2XRND) : GOTO 30 


1 

Y 

i 

1 

1 

1 

I 

se PXR(M)=PXR(M-1) +VXR:PYR(M)=PYR(M-1) 
12 

0 

1 

1 IN 
T PR 
I 

1 
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3060 IF SS=0 THEN HAS=HAS+1::1F HAS<9 TH 

EN 3090 ELSE HAS=HAS-8:GOTO 3090 

3070 HAS=HAS-1:1F HAS23O THEN 3090 

3080 HAS=HAS+8 

3090 IF HAS=1 THEN 3100 ELSE IF HAS=2 T 
HEN 3110 ELSE IF HAS=3 THEN 3120 ELSE IF 
HAS=4 THEN 3130 ELSE IF HAS=S5 THEN 3140 
ELSE IF HAS=é6 THEN 3150 ELSE IF HAS=7 T 


VXR=1: VYR=1: GOTO 3180 
VXR=1:VYR=0:GOTO 3180 

VXR=1: VYR=-1:GOTO 3180 
VXR=O:VYR=-1: GOTO 3180 
VXR=-1:VYR=-1:GOTO 3180 

VXR=-1: VYR=O: GOTO 3180 

VXR=-1: VYR=1: GOTO 3180 

VXR=O:VYR=I 

REM CHOIX EVENTUEL HEURIST DEGMT (H 


IF HEUR$S="H" THEN 3200 ELSE 3210 
3200 VXR=2XVXR: VYR=2XUYR 
3210 OBS=i 


RETURN 

2010 REM SSPROG MAITRE REJOINT 

010 IF PXR(M)<>PXM THEN RETURN ELSE 1F 
EYE UM) C2PUN il Een 
40 re FOR TO 4:SOUND 1,27,5,7:FOR 
AT=1 TO 100: :NEXT ; NEX 
2023 COL= 
4030 FOR ÂT=1 TO 8O00:NEXT:1F COL=0O THEN 


200 

3040 FOR FOIS =1 TO 4:PAPER 2:CLS:SOUND 
,7:FOR AT=1 TO 200:NEXT: PAPER 0O:C 

L&? FHÉRT FOIS 

4050 CLS:PEN 2:LOCATE 11,11:PRINT"ASSEZ 

POUR AUJOURD'HUI..." 

4060 END 

5000 REM HEURISTIQUE SPECIALE COLERE ROB 


OT 

9010 PEN 2:LOCATE 36,21:PRINT CHR$(33):F 

OR FOIS=1 TO 4:SOUND 1, 100, 337:FOR AT=1 

TO 100:NEXT:NEXT FOIS 

95020 FOR N=O TO 32:PEN 2:LOCATE 36-N,21 

PRINT CHR$(33):PEN 3:LOCATE 36-N,21: :ÉRI 

T CHR$&(33) : NEXT 

9030 FOR N=i Me 18:PEN 2:LOCATE NE 21-N: 
3 


0 ONUGQUIBUNE-O 
© OCO0O000000O 


N 
s 


) 
PXR(0)=4:PYR(O)=2:PEN 1:LOCATE PXRI{ 
0) PYR(O) : PRINT CHR$S (33) 
5060 _MAL= O:COL=1’REINIT MAL ET SIGNALMT 


9060 RETURN 
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Commentaires techniques 


Les heuristiques normales du robot, c’est-à-dire sans intervention spé- 
ciale de l’opérateur, sont comme nous l'avons vu : 1 pour la naviga- 
tion et C pour les dégagements. 


Les changements d’heuristiques sont provoqués au clavier : 
Tous les trois parcours, par la réponse O ou N à la question ‘‘B?” 
(bien ?) posée par le robot ; 


À un moment quelconque d’un parcours, par des changements ponc- 
tuels à l’aide des touches 2, 4 ou H. 


La question ‘‘B ?’” est programmée en amont de la boucle des mouve- 
ments, tous les trois parcours, à l’aide du paramètre RGP (rang du par- 
cours) préalablement initialisé à O0, puis réinitialisé à 1 lors de chaque 
réponse. 


Chaque réponse négative (touche N) se traduit par l’incrémentation 
du paramètre MAL, initialisé à 0, qui sert à aiguiller le programme 
sur l’heuristique adéquate : 1 si MAL = 0, 1 ‘‘réduite”’ si MAL = 1, 
1 ‘‘dilatée’”’ si MAL = 2 et heuristique spéciale-colère si MAL = 3. 
Si MAL = 0, IN joue son rôle habituel ; 

Si MAL = 1, IN est réduit : IN = 0,3 x IN; 

Si MAL = 2, IN est dilaté : IN = 3xIN; 

Si MAL = 3, renvoi au sous-programme heuristique spéciale-colère. 


Les interventions au clavier pour modifier le comportement du robot 
en cours de route (touches 2, 4 et H) sont programmées au début de 
la boucle des mouvements à l’aide du paramètre réponse HEUR$ qui 
prend alors la valeur ‘‘2’’, ‘‘4”’ ou ‘‘H”’. 


Si HEUR$ = ‘‘2”’, heuristique 2. 


Si HEUR$ = ‘‘4”’, heuristique 4, qui constitue le négatif de l’heuris- 
tique 1 et correspond donc à une fuite du robot dans la direction oppo- 
sée à son maître ; il suffit donc de prendre les valeurs — VXR et — VYR 
de l’heuristique 1. 


Si HEUR$ = ‘‘H”’, heuristique H qui consiste pour le robot à se dégager 
en sautant une case suivant la direction de l’heuristique C; il suffit 
donc de doubler les composantes VXR et VYR de l’heuristique C : 
c’est ce que fait dans ce cas le sous-programme heurt pilier. 


Dans les autres cas, heuristiques 1 et C. 
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° Sous-programme heuristique spéciale : le robot emprunte un chemin 
détourné contournant l’ensemble des piliers. D'abord, un parcours hori- 
zontal jusqu’au bord gauche de l'écran, puis une remontée vers l’angle 
supérieur gauche. Le sous-programme se termine alors et le robot achève 
normalement son parcours avec les heuristiques 1 et C. Un drapeau 
COL = 1 (colère) annonce la fin des opérations; c’est le sous- 
programme maître rejoint qui exploite ce signal et donne congé à l’opé- 
rateur sous la forme : ‘‘assez pour aujourd’hui!” 
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VII 


GÉNÉRALISATION DE L'UTILISATION 
DES FONCTIONS LOGIQUES 


“L'œuvre d’art, c’est une idée qu’on exagère.”” 
A. GIDE. 
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En E18, la fonction logique C$(I, J) nous a permis de montrer comment 
on peut diversifier pour l’ordinateur les éléments de l'univers à 
représenter : piliers, Gluons et robot passif. 

Nous allons, à l’aide des deux exemples suivants, illustrer le degré de 
puissance et de généralité de ce concept. Puissance en E25, généralité 
en E26 et aussi, dans les deux cas, simplicité. Il fait en somme partie 
de ces choses dont Audiberti disait qu’elles pouvaient être géniales sans 
être pour autant idiotes. 

La fonction logique utilisée dans les deux exemples prendra, non plus 
des valeurs chaînes comme en E18, mais des valeurs numériques. Ces deux 
formes, interchangeables et équivalentes en puissance, sont toutes deux 
accessibles en BASIC. 

Par contre, le BASIC ne permet ordinairement pas d'utiliser des 
arguments (1, J) autres que numériques et nous prive par exemple du 
superbe mode de représentation suivant : 


si Ï est un objet et si J est son propriétaire, 


si la fonction logique QAL(I, J) prend comme valeur une qualité 
de l’objet considéré, 


on pourrait alors écrire dans une base de données : 


QAL(POMME, JEAN)=ROUGE ou 
QAL(CHAMP, JACQUES) = FERTILE 


Mais cela n’est pas très gênant car l’on peut toujours codifier les objets 
et les propriétaires par deux séries de nombres I et J. 
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ÉTAPE E25 
LA PUISSANCE SIMPLIFICATRICE 


Présentation 


Reprenons l’exemple E13, avec le robot, les piliers et les heuristiques 
letF, cette dernière interdisant notamment, comme déjà vu, les retours 
en arrière. 

Nous allons représenter cette fois zows les éléments de l’univers du robot 
par la fonction logique C(I, J), prenant des valeurs diverses selon les élé- 
ments présents dans la case de coordonnées I, J : 


case vide C{I, J) = 0 
pilier C(I, J) = 1 
maître C(E, J) = 2 
trace C(E J) = RG + 2 (RG : rang du parcours). 


Les traces des pas précédents sont donc intégrées dans l’univers du robot 
qui pourra ainsi tenir compte facilement de leur présence sans recourir 
aux artifices de E13 (VVXR et VVYR). 

On a donné aux cases concernées la valeur variable RG + 2, de manière 
à offrir une option à l'opérateur : il peut désirer que seuls les retours sur 
les traces du parcours en cours soient prohibés (cas de E13), ou que /04- 
tes les traces, y compris celles des parcours précédents, lui soient interdites. 

Pour savoir s’il y a ou non une trace dans la case où le robot veut aller, 
il suffit de tester la valeur de la fonction C(PXR, PYR). Si C vaut RG + 2, 
on se trouve sur une trace du parcours en cours ; si C est égale ou supé- 
rieure à 3, on est sur une trace de l’un quelconque des parcours. 

C’est l’un ou l’autre de ces deux tests qui est mis en œuvre dans le 
sous-programme spécialisé suivant l’option choisie par l'opérateur. 

Outre cette possibilité d'offrir de manière simple une option, l’exten- 
sion de la fonction logique aux traces allège le sous-programme et le pro- 
gramme principal (suppression de la mémorisation de VVXR et VVYR). 


Programme 
100 ETAPE _E2S:CMME E13.,EN UTIL FONCT LO 
GIQUE C(1,9J3) POUR REPRÈS LA TÔÜTALITE DES 


ELEMENTS DE L’UNIVERS DU ROB:PILS,MTRE 
TRACES;L’'HEUR DE DEGT (F) EST LEGERMT MO 
DIF:INTERDICT RET SUR TTE TRACE PRECDTE 
ET NON PLUS SEULMT SUR LA DERNIERE 
110 INK O,Z2:INK 1,1:INK 2,6:INK 3,14:CL 
S: CLEAR 
120 REM OPTION SUR TRACES:INTERDIC RETOU 
R SUR TRACES DES PARCOURS PRECEDENTS OÙ 
SEULEMENT SUR CELLES DU PARCOURS EN COUR 


S7 
130 CLS:FEN 1:LOCATE 6,9:INPUT "TRACES D 
ES PARCOURS PRECEDENTS 

INTERDITES 


(Q POUR OUI,N POUR NON)";RS& 
140 IF (R$<$"O" AND R$(>"N") THEN 130 
150 DIM C(40,25)’TABLEAU DES COORDONNEES 
DES CASES DÉ L'ECRAN SUSCEPTIBLES DE RE 
CEVOIR UN ELEMENT DE L’UNIVERS DU ROBOT 
160 REM VALEURS DE LA FONCTION LOGIQUE € 
(1,J) POUR LA CASE DE COORDONNEES 1,J;CA 
SE VIDE: C=0;PILIER:C=1 MAITRE: C=2; TRACE : 
— +. 
170 SYMBOL AFTER 32:SYMEOL 33,&0,&7C,&D6 
,k6C,R38,RFE,&7C,&6C" DESSIN ROBOT; DESSIN 
MAITRE: CODE 250 
180 ’NOMBRES ALEATOIRES VARIES 
190 RANDOMIZE TIME 
200 CLS:RG=1:H=INT(2XRND):IF H=1 THEN PX 
M=INT (25SXRND+6) :PYM=6 ELSE PXM=6:PYM=INT 
(12XRND+6)’TIRAGE POSITION MAITRE 
210 PEN 2:LOCATE FXM,PYM:PRINT CHRS& (250) 
:C(PXM,PYM)=2"AFF ET REPRESENTATION MAIT 
REMAITRE 
220 PXR=36:PYR=21:PPXR=PXR:PPYR=PYR: PEN 
1:LOCATE PXR,PYR:PRINT CHR$(33) AFF ROBO 
T DEPART ET MISE EN RES FOUR TRACE 
230 IF RG>1 THEN 1000 
240 REM TIRAGE 31 PILIERS 
250 FOR N=0 TO 30:TERRS=INKEYS:1IF TERR#K 
5" " THEN 260 ELSE 110 
260 I=INT((33-PXM)XRND) +PXM-1:J=INT((21- 
PYM) / (36-PXM)X(1-FXM))+INT((SXRND-2)Y#(1- 
PXM) /8) +PYM+1 
270 IF J)PYM-2 THEN 290 
280 J=PYM-1:GOTO 310 
290 IF J(>PYM THEN IF J<22 THEN 310 ELSE 
J=21:G0T0 310 
300 IF I<>PXM THEN 310 ELSE J=PYM-1 
310 PEN 1:LOCATE 1,J:PRINT"=":C(1,J)=1:N 
EXT'AFF ET REPRÉSENTATION PILIER 
520 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
XT’TOP DEPART 
1990 REM BOUCLE DES, MOUVEMENTS 
: M=1 TO 50°50 MOUVMTS MAXI ADMIS 
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POUR ATTEINDRE MAITRE 

1020 REM HEURIST NAV (1) 

1030 IF PXR<C>PXM THEN NUME=ABS (PYR-PYM): 
DENO=ABS (FXR-PXM) : IN=NUME/DENO ELSE 1060 
1040 IF Tes 5 THEN VXR=SGN(PXM-PXR) : VYR 
=0:GOTO 107 

1050 IF IN? THEN VXR=O:VYR=SGN(PYM-PYR) 
: GOTO 1070 

1060 VXR=SGN(PXM-PXR) : VYR=SGN (PYM-PYR) 
1070 TT=O’'INITIALISATION DU RANG TT DES 
TENTATIVÉES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN PILIER 

1080 PXR=PPXR+UXR: PYR=PPYR+UYR 

1090 GOSUB 3000’TEST HEURT PILIER 
HÉboë OBS=0 THEN 1110 ELSE 1080'’RECALC 
L 
110 IF RET=0 THEN 1120 ELSE 1080 
20 IF M<>MPI THEN 1250 

30 REM HEURIST DE DEGT (F):ESSAI AUTRE 
ENS D’EXPLORATION 

40 IF ESS=1i THEN 1180 ELSE PEN 2:LOCAT 
PXR, PYR: PRINT "?"::PXR1=PXR: PYRI=PYRE VX 
=UXR: VYRI=VYR'AFF ET MEMO 1ERE POS 

50 FOR AT=1 TO 100: NEXT:SSS=SS.IF SSS= 
ENS ELSE SS=1°INVERSION SENS DE 


60 TT=2:E5S=1:D=D1:GOSUB 3250 
70 GOTO 1080? RECALCUL POS 
80 ESS-=0:MPI=0"REINIT ESS ET MPI 

à PEN I OCATE PXR, PYR:PRINT"?":FOR A 
TO 106: NEXT'AFF 2ÈME POS 

O REM HEUR DE DEGT (F):CHOIX MEILLEUR 
GSITION,PLUS COURTE DES 2 DISTANCES D 
1 ET DIST2 AU MAITRE 

HOR1=ABS (PXM-PXR1) : VERTI=ABS (PYM-PY 
: IF HOR1>VERTI THEN DISTI=HORI ELSE 


Tia VERT Ii 

HOR2=ABS (PXM-PXR) : VERT2=ABS (PYM-PYR 
RAR VENTE THEN DIST2=HO0OR2 ELSE DIS 
30 IF SALES =DISTI THEN 1240 ELSE LOCA 
; "s: PXR=PXR1:PYR=PYRI: VX 
VXR1?VYR=UYR1: GOTO 1250°71ÈRE POS CHOIS 


re "Has PXR1,PYRI1: PRINT" "’2EME POS 


50 PEN S:LOCATE PPXR,PPYR:PRINT CHRS (3 
: C(PPXR, PPYR) =RG+2! PEN 15 SLOCATE PXR,PY 
: PRINT CHR (33) : SOUND 5,7:PPXR=PXR 
: PPYR=PYR'AFF ET RÉPRÉSENTATTON TRACE 
1260 FEN 1: LOCATE DEXR PYR: PRINT EHRS 133) 
: SOUND 1,30,5 R=PXR: PPYR=P 

1270 GoSÛB TE TEST MAITRE RETCENT 

1280 NEXT M 
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RARES 1, 300,40,7:GO0OTO 4030’ PARCOURS 


1300 END 
2000 REM ZONE DES SOUS-PROGRAMMES 
3000 REM SSPROG HEURT PILIER ET/OU RETOU 
R SUR TRACE PRECEDENTE 
3010 OBS=0:RET=0 
3020 IF CIPXR,PYR)=1 THEN 3030 ELSE 3040 
"TEST PILIER 
3030 SOUND 1 5,7:PEN 2:LOCATE PXR,PYR 
PRINT OL FUR D +2 1 TO 30:NEXT:PEN 1:L0CA 
TE PXR,PYR:PRINT"=":0OBS=1:GOTO 3080 
3040 IF R$="0" THEN 3060’TEST RETOUR SUR 
TRACE PRÉCEDENTE 
3050 IF C(PXR,PYR)=RG+2 THEN 3070 ELSE R 


URN 
EN IF C(PXR,PYR)23=3 THEN 3070 ELSE RET 


Ne IF TT>7 THEN RETURN ELSE SOUND 1,20 
: PEN 2: LOCATE PXR, PYR: PRIN NT"#":FOR À 

LE 1” TO 30:NEXT:PEN 3:LOCATE PXR,PYR:PRIN 
CHR$S (33) :RET=1 

2080 AR QUE 1 TO SO:NEXT:TT=TT+1:MPI=M'M 

EMO NO LE 

3090 REM ÉSsar NOUVELLE DIRECTION 

3100 REM HEURISTIQUE DE DEGAGEMENT (F):E 

XPLORATION ORDONNEE DES DIRECTIONS EN P 

ARTANT DU Cas HEURTE 

3110 FOR AT= 9SO:NEXT AT:1F TT>1 THEN 
3250’CAS 2EME PASSAGE ET SUIVANTS 

3120 IF VXR=-1 THEN 3150’CAS 1ER FSU -neE 
NÉE II ON DE LA DIRECTION Di DU 1ER 


HE 

3130 IF VXR=O THEN 3180 

3140 IF VXR =1 THEN 3200 

3150 IF VYR=-1 THEN Di=5: EE 3230 

3160 IF VYR=O THEN D1=6:GOTO 3230 

3170 IF VYR=1 THEN Di=7: GOTO 3230 

3180 IF VYR=-1 THEN D1=4:GOTO 3230 

3190 IF VYR=1 THEN D1=8:GOTO 3230 

3200 IF VYR=-1 THEN D1=3:GOTO 3230 

3210 IF VYR=O THEN Di=2:GOTO 3230 

3220 IF VYR=1 THEN Di=1 

RE D=D1’DIRECTION D DEBUT DE L'’'EXPLORA 
RP SS=INT (2X*RND) 'TIRAGE SENS DE L'EXPL 


3250 REM EXPLORATION A SUIVANTE 
3260 IF SS=0 THEN D=D+1:1IF D<9 THEN 3280 
ELSE D=D-8:GOTO 3280 

3270 D=D-1:1F D>0 THEN 3280 ELSE D=D+8 
3280 IF D=1 THEN 3290 ELSE IF D=2 THEN 3 
300 ELSE IF D=3 THEN 3310 ELSE IF D=4 TH 
EN 3320 ELSE IF D=5 THEN 3330 ELSE IF D= 
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AE 3340 ELSE IF D=7 THEN 3350 ELSE 3 


32970 VXR=I1: VYR=1: GOTO 3370 

3300 VXR=1: VYR=O: GOTO 3370 

3310 VXR=I1:VYR=-1: GOTO 3370 

3320 VXR=O: VYR=-1: GOTO 3370 

3330 VXR=-1:VYR=-1: GOTO 3370 

3340 VXR=-1:VYR=0O:GOTO 3370 

3350 VXR=-1: VYR=1: GOTO 3370 

3360 VXR=O:VYR=1 

3370 RETURN 

4000 REM SSPROG MAITRE REJOINT 

4010 UE C(PXR,PYR)<>2 THEN RETURN 

4020 FOIS=1 TO 4:SOUND 1! 3275937: FOR 

AT=1 TO 100: NEXT:NEXT 

4030 FOR AT=1 TO SOO:NEXT:RG=RG+1:1IF RG< 
6 THEN PEN 3:LOCATE PPXR, PPYR: PRINT CHRS 
(33): GOTO 210 ELSE 110 


Commentaires techniques 


e L'option sur les traces à interdire est proposée en tête du programme 
à l’aide de l'instruction INPUT, à laquelle la réponse ‘‘O’’ ou ‘‘N”’ 
est donnée au clavier (paramètre Rf). 


e La trace de chaque pas est affichée en temps voulu dans la boucle des 
mouvements, puis représentée aussitôt par C(PPXR, PPYR) = RG + 2. 


e Comme indiqué précédemment, le sous-programme heurt pilier ou 
retour en arrière teste la valeur de la fonction C(PXR, PYR). Les valeurs 
qui l’intéressent sont 1, RG + 2 ou égales ou supérieures à 3. 


e Il en est de même, bien entendu, pour le sous-programme maître 
rejoint. La valeur qui l’intéresse est 2. 
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ÉTAPE E26 
CINQ SENS POUR UN DANGEREUX ITINÉRAIRE 


Présentation 


Pour aller au bout de leur logique, les fonctions bien nommées vont 
fleurir dans un labyrinthe fourre-tout spécialement conçu. 
Le robot va y trouver en effet : 


e des cases vides où il pourra poser ses pieds : C(I, J) = 0; 

e des piliers : C(I, J) = 1; 

e son maître : C(I, J) = 2; 

e des victuailles : C(I, J) = 3; 

e des trappes ; C(I, J) = 5; 

e des sonneries susceptibles de lui redonner du moral : C(I, J) = 6; 


e enfin, une zone odorante au voisinage des victuailles : C(I, J) = 4. 


On aurait pu en rajouter, avec des peaux de banane, des toboggans, 
des abreuvoirs, etc., et l’on pourrait décrire ainsi à l'ordinateur un monde 
très riche dans lequel chaque case d’écran recélerait un élément diffé- 
rent, la seule limite à cette diversification étant la résolution de l’écran. 

Les positions de tous les éléments sont tirées au hasard et affichées à 
l'écran. 

Roméo tente de rejoindre son maître à travers ce labyrinthe en utili- 
sant les heuristiques 1 et F. 

En plus des éléments externes énumérés plus haut, il aura aussi affaire 
à ses propres traces puisqu'il lui est interdit, dans l’heuristique F, de revenir 
dessus. Pour ces traces, la fonction logique prend la valeur RG + 6, pour 
ne tenir compte que de celles du trajet en cours (voir E25). 

Le robot prend le départ avec un potentiel vital de 25 points, poten- 
tiel qui ne doit jamais devenir négatif sous peine d'interruption du par- 
cours, et qui est en permanence affiché à l'écran. 

Des sous-programmes spécialisés règlent comme d'habitude les consé- 
quences de toutes les rencontres, heureuses ou non, que le robot est sus- 
ceptible de faire au cours de son trajet, en testant chaque fois la valeur 
de la fonction logique à l'endroit considéré. Les règles sont les suivantes : 
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e chaque pas lui coûte 1 point de vitalité; 
° chaque passage sur une trappe lui retire 4 points; 
° chaque absorption de victuailles lui redonne 20 points; 
e 
e chaque parcours réussi (maître rejoint) lui donne 15 points; 


° chaque parcours raté (potentiel vital devenu négatif) constitue un échec, 
mais nécessite une nouvelle dotation de 25 points pour lui permettre 
de commencer un nouveau parcours ; 


* chaque sonnerie dont il réussit à deviner la provenance exacte lui rap- 
porte 10 points. 


Le robot effectue ainsi sept parcours, sources de péripéties assez 
complexes qui permettent de voir les divers effets provoqués par chaque 
événement. 

Outre la diversité de ces effets accumulés, l’intérêt du présent exem- 
ple consiste dans la simulation de nouveaux sens de perception du robot. 

Rappelons que le toucher intervient lorsque l’élément concerné est 
détecté au moment où le robot arrive dessus : c’est le cas des piliers, des 
trappes, des victuailles et du maître rejoint. 

La vue permet quant à elle de détecter un élément éloigné, et d’en 
apprécier la direction et dans certains cas la distance : c’est le cas du maî- 
tre pour les besoins de l’heuristique de navigation. 

Cette fois, Roméo sera doté de trois sens supplémentaires : 


e J'ouïe, qui lui permet de détecter l’activité d’une sonnerie et de savoir 
dans quelle direction approximative elle se situe : il doit ensuite en 
rechercher l'emplacement exact par déductions successives, son maître 
(le programme) lui indiquant chaque fois s’il a visé trop à gauche ou 
trop à droite; 


e J'odorat, qui lui permet de savoir s’il se trouve à proximité immédiate 
d’un stock de victuailles, c’est-à-dire dans l’une des huit cases qui entou- 
rent ce stock. Comme dans la réalité, ce sens est donc, d’une part de 
portée limitée, et d’autre part non directif : le robot ignore de quel 
côté arrive l'odeur, et il doit trouver ensuite la bonne case par explora- 
tion tactile ; 


e la faim, simulée par un potentiel vital suffisamment faible pour qu'il 
se détourne de son chemin lorsqu’une odeur alléchante se manifeste. 


Toutes ces perceptions doivent être bien entendu simulées et traitées 


— 161 — 


d’une manière correcte dans le programme. Il en résulte d’ailleurs que 
ce programme est assez important puisqu'il occupe plus de quarante kilo 
octets de mémoire vive. 


Programme 


APE E26:GENERALISTION UTILIS FONC 
UE C(I1,3) POUR REPRES LES ELEMENT 
UNIVERS COMPLEXE DU ROB:PIL,MTRE 
LLES,ODEUR VICTUAILLES, TRAPPES, Sd 
8, TRACES3;HEUR NAV (1),HËUR DEGT (F 


K O,22:INK 1,1:INK 2,6:INK 3,14:CL 


M C(40,25)’TABLEAU DES COORDONNEES 
ASES DE L'ECRAN SUSCEPTIBLES DE RE 
UN ELEMENT DE L’UNIVERS DU ROBOT 

M VALEURS DE LA FONCTION LOGIQUE € 
POUR LA CASE DE COORDONNEES 1,J;CA 
DE: C=0;PILIER:C=13; MAITRE: C=2;VICTUA 
ILLES:C=3; ENTOURAGE VICT:C=4; TRAPPE: C=51 
SONNERIE : C=63; TRACE: C=RG+é (POUR NE TENIR 
QEONPTE QUE DES TRÂCES DU PARCOURS EN CO 
140 SYMBOL AFTER 32:SYMBOL 33,&0,&7C,&D6 
,&éC,&38,8FE,&?C,&6C’ DESSIN ROBOT; DESSIN 
MAITRE: ÉODE 250; DESSIN TRAPPE:CODE 127 

150 ’NOMBRES ALEATOIRES VARIES 

160 RANDOMIZE TIME 

170 CLS:RG=1:MVI=50:VI=25:GOSUB 8000” INI 
TIALISATION RANG PARCOURS RG,NO BCLE DE 

RAVITAILLEMT MVI ET RESERVE VITALE VIDU 

ROBOT,ET AFF VI 

160 PXN=S:PYMS INT (L6XRND) +5° TIRAGE POS M 


190 PEN 2:LOCATE PXM,PYM:PRINT CHR$(250) 
PE titre AE ET REPRESENTATION MAIT 


200 REM TIRAGE 52 PILIERS,S STOCKS DE VI 
CTUAILLES ET 10 TRAPPES 


T 
Q 
1 


4-1 -O 


Mtiere Mm>ZHmM 


210 C(7,PYM)=1:PEN 1:LOCATE ?7,PYM:PRINT" 

=":C(8,PYM+1)=1:LOCATE 8,PYM+1:PRINT"=" 

220 FOR N=1 TO 50:1I=4Y#INT (SXRND) +9:J=INT 
COLE PYM) /214 1-8) ) + INT C(SKRND-2) (1-6) / 

+ 

230 IF J(23 THEN C(I,J)=1:PEN 1:LOCATE I 
J:PRINT"=" ELSE J=2?:GOT0 230’PILIERS 

240 IF INTIN/5)<>N/5 THEN 250 ELSE IF Ct 
1-1,J+1)<)1 THEN C(I,J+1)=5S:PEN 2:LOCATE 
1,ÏJ+1:PRINT CHR$ (122) TRAPPES 

250 NEXT N 
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260 FOR N=1i TO S:1I=4XN+7:J=INT((19-PYM)/ 
Z1X#(1-8))+PYM+1:1F J<23 THEN 270 ELSE J= 


22 

270 FOR A=I1-1 TO I+1:FOR B=J-1 TO J+1:C( 
A,B)=4:PEN 3:LOCATE A,B:PRINT"'-":NEXT B: 
NÉXT A’ENTOURAGE VICTUAILLES 

280 C(I,J)=3:PEN 2:LOCATE I,J:PRINT"*":N 
EXT N'UVICTUAILLES 

290 PXSI=INT (31XRND) +2:PYSI=INT (2XRND) +3 
:PXS2= INT (31XRND) +2: PYS2=INT (2XRND) +23: C 
(PXS1,PYS1)=6:C(PXS2,PYS2)=6: PEN 2:LOCAT 
E PXS1,PYS1:PRINT"S"ILOCATE PXS2,PYS2:PR 
INT"S" SONNERIES 

300 PXR=29:PYR=19:PFXR=PXR:PPYR=PYR: PEN 

13 LOCATE PXR,PYR:PRINT CHR$(33) ROBOT AU 
310 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
XT’TOP DEPART 

1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=1 TO 50 

1020 GOSUB 7000’ TEST SONNERIE 

1030 IF M<>MVI THEN 1050 ELSE GOSUB 5000 
CONSOMMATION VICTUAILLES 

1040 GOTO 1340 

1050 REM HEURIST NAV (1) 

1060 IF PXR<)PXM THEN NUME=ABS (PYR-PYM) : 
DENO=ABS (PXR-PXM) : IN=NUME/DENO ELSE 1090 


1070 IF IN<O.S THEN VXR=SGN(PXM-PXR) : VYR 
=0:GOTO 1100 
1080 IF IN>2 THEN VXR=O:VYR=SGN(PYM-PYR) 
: GOTO 1100 
1090 VXR=SGN(PXM-PXR) : VYR=SGN (PYM-PYR) 
1100 TT=0’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES AVOIR HEURTE UN PILIER 
1110 PXR=PPXR+VXR: PYR=PPYREUYR 
O0 GOSUB 3000’TEST HEURT PILIER 

IF OBS=0 THEN 1140 ELSE 1110’RECALC 


12 

130 

L POS 

140 IF RET=0 THEN 1150 ELSE 1110 

150 IF M<>MPI THEN 1300 

160 REM HEURIST DE DEGT (F):ESSAI AUTRE 

SENS D’EXPLORATION 

170 IF ESS=i THEN 1210 ELSE PEN 2:LOCAT 
PXR, PYRI PRINT"? "2: PXRI=PXR: PYRI=PYRE VX 
1=VXR: VYRI=VYR'AFF ET MEMO ÎERE FOS 

180 FOR AT=1 TO SO:NEXT:SSS=SS. IF SSS=i 
Ter SS=0 ELSE SS=1?INVERSION SENS DE R 
1 
2 
2 
2 


1 
1 
U 
1 
1 
Î 
1 
E 
R 
1 
0 
1190 TT=2:ESS=1:D=Di:GOSUB 3230 

1200 GOTO 1110’RECALCUL POS 

1210 ESS=0:MPI=O0'REINIT ESS ET MPI 

1220 PEN 2:LOCATE PXR, PYR:PRINT"?":FOR À 


— 163 — 


TO 100:NEXT'AFF 2EME POS 
O REM HEUR DE DEGT (F):CHOIX MEILLEUR 
OSITION,PLUS COURTE DES 2 DISTANCES D 
1 ET DIST2 AU MAITRE 

O0 HOR1=ABS (PXM-PXR1) : VERTI=ABS (PYM-PY 
: IF _HOR 1 VERT! THEN DISTI=HOR1 ELSE 

HOR2=ABS (PXM-PXR) : VERT2=ABS (PYM-PYR 
F HOR2 > VERT 2 THEN DIST2=HOR?2 ELSE DIS 


IF DIST2<=DISTI THEN 1290 ELSE 1270 
O IF C(PXR,PYR)<)5 THEN IF C(PXR,PYR) 
54 THEN LOCATE PXR,PYR:PRINT" " ELSE FE 
: LOCATE FXR,PYR:PRINT"-" ELSE PEN 1:L 
ATE PXR, PYR: PRINT CHR$(127)'1ERE POS C 
© PXR=PXR1:PYR=PYR1:GOTO 1300 

© IF C(PXRI,PYR1)<)S THEN IF C(PXRI,P 
)<>4 THEN LÔCATE PXRI,PYR1:PRINT" "’E 
PEN 3:LOCATE PXR1,PYR1:PRINT"-" ELSE 
1:LOCATE PXR1,PYR1:PRINT CHR#(127)? 
POS CHOISIE 

VI=VI-1:GOSUB 8000 

REM TEST SUR DECISION DE RAVITAILLE 


IF C(PXR,PYR)<>4 THEN 1340’ ABSENCE 
EUR VICTUAILLES 

F VIDPXR-PXM+3 THEN 1340 ELSE MVI= 
SERVÉ VITALE ROBOT SUFFISANTE, OÙ 5 
T DECISION RAVITAILLEMENT LORS PRO 


CLE 
C(PPXR,PPYR)I<2>3 THEN 1350 ELSE P 
CATE PPXR, PPYR:PRINT""":GOTO 1370 
C(PPXR,PPYR)<ÿ4 THEN 1360 ELSE P 
ATE PPXR,PPYR:PRINT"-":GOTO 1370 
3:LOCATÉ PPXR,PPYR:PRINT CHRS (3 
XR, PPYR) =RG+6’ ÂFF ET REPRESENTAT 


0 PEN 1:LOCATE PXR,PYR:PRINT CHR (33) 
1380 IF SONO=1 THEN SONO=0:FOR AT=1 TO 3 
00:NEXT:GOTO 1390 ELSE SOUND 1,40,5,7 
1390 GOSUB 4000’TEST MAITRE REJOINT 

1400 GOSUB 6000’ TEST TRAPPE 

1410 FPXR=PXR:PPYR=PYR’ FUTURE TRACE 
1420 IF VI>O THEN 1430 ELSE M=50’TEST PO 
SIBILITE CONTINUER SI ROBOT NON EPUISE 
30 FOR AT=1 TO 100:NEXT:NEXT M 
40 REM PARCOURS RATE 

0 SOUND 1,500,40,7:RG=RG+1:FOR AT=i T 
OO: NEXT::PEN 3:LÔCATE PXR,PYR:PRINT C 
(33)°AFF TRACE 
O LE RG=8 THEN 110 ELSE VI=VI+25:GOSU 
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1470 C(PXSI,PYS 
E PxS1, PYS1:PRI 
T" "!GOTO 290 

1480 END 


2000 REM ZONE DES SOUS-PROGRAMMES 
3000 PÉTER HEURT PILIER ET/OU RETOU 


260 OBS=0:RET=0 
020 IF C(PXR,;,PYR)=1 THEN 3030 ELSE 3040 
STÉST END 


=0 : C(PXS2,PYS2)=0:LOCAT 


1) 
NT" ":LOCATÉ PXS2,PYS2:PR 


3030 SOUND 7: PEN 2:LOCATE PxR PYR 
PRINT ESC FÜR Q+2 iT 30: NEXT : PEN :LOCA 
TE PXR, PYR: PRINT" e » ; OBS :GOTO 306 


040 IË C(PXR,PYR)=RG+é6 THEN 3050 ÊLSE R 
ETURN: TEST TRÂCE 
3050 IF TT>7 THEN RETURN ELSE SOUND 1 
:PEN 2:LOCATE PXR, PYR: FRINTT HS FOR À 
LE 1”: NEXT:PEN 3:LOCATE PXR,PYR: PRIN 
CHRS (393) RET=1 
2066 FOR AT=1 TO SO:NEXT:TT=TT+1:MPI=M’M 
EMO NO BOUCLE 
3070 REM ESSAI NOUVELLE DIRECTION 
3080 REM HEURISTIQUE DE DEGAGEMENT (F):E 
XPLORATION ORDONNEE DES DIRECTIONS EN PF 
ARTANT DU PILIER HEURTE 
3090 FOR AT=1 TO SO:NEXT AT:IF TT)i THEN 
3230’ CAS 2EME PASSAGE ET SUIVANTS 
3100 IF VXR=-1 THEN 3130’CAS 1ER PASSAGE 
» DETERMINAT ION DE LA DIRECTION Di DU 1ER 


EURT 
3110 IF VXR=O THEN 3160 
3120 IF VXR =i1 THEN 3180 
3130 IF VYR=-1 THEN Di=5:GOTO 3210 
3140 IF VYR=O THEN D1i=é: GOTO 3210 
3150 IF VYR=1 THEN Di1=7:GOTO 3210 
3160 IF VYR=-1 THEN Di=4:GO0OT0O 3210 
3170 IF VYR=1i THEN D1=8:GO0OT0 3210 
3180 IF VYR=-1 THEN Di=3:GOTO0 3210 
3190 IF VYR= : THEN Di=2:GOTO 3210 
3200 IF VYR=1 THEN D1=1 
3210 D=Di’ DIRECTION D DEBUT DE L’EXPLORA 
Han 


D nr CNRC ARASE SENS DE L'’EXPL 


3230 REM EXPLORATION POSITION SUIVANTE 
3240 IF SS=0 THEN D=D+i1:IF D<9 THEN 3260 
ELSE D=D-8:GOTO 3260 

3250 D=D-1:1IF D>0 THEN 3260 ELSE D=D+8 
3260 _IF D=1 THEN 3270 ELSE IF D=2 THEN 3 
280 ELSE IF _D=3 THEN 3290 ELSE IF D=4 TH 
EN 3300 ELSE IF D=5 THEN 3310 ELSE IF D= 
6 THEN 3320 ELSE IF D=7 THEN 3330 ELSE 3 


340 
3270 VXR=1:VYR=1:GOTO 3350 
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3280 VXR=1:VYR=0:GOTO 3350 

3290 VXR=1:VYR=-1:GOTO 3350 

3300 VXR=0:VYR=-1:GOTO 3350 

3310 VXR=-1:VYR=-1:GOTO 3350 

3320 VXR=-1:VYR=0:GO0OTO 3350 

3330 VXR=-1:VYR=1:GOTO 32350 

3340 VXR=0:UVYR=I 

3350 RETURN 

4000 REM SSPROG MAITRE REJOINT 

4010 IF C(PXR, PYR) <22 THEN RETURN 

4020 FOR FOIS=1 TO 4:SOUND 1,27,5,7:FOR 
AT=1 TO 100: NEXTINEXT 

4030 FOR AT=1 TO 800:NEXT:RG=RG+1:1F RG= 
8 THEN 110 ELSE PEN 2:LOCATE PXM PYM:PRI 
NT CHR$(250) :VI=VI+15:GOSUB 80 

4040 C(PXS1,PYS1)=0:LOCATE PSSŸ ys1: PRI 
NT" ":C(PXS2,PYS2)=0:LOCATE PXS2.PYS2:PR 
INT" 1F@b7 O0 290 

3000 _RÉM LSPROG RAVITAILLEMENT EN VICTU 
5010 REM 1ERE PHASE : RECHERCHE EMPLACEMEN 
T EXACT VICTUAILL 

5020 SOUND 1,100 50, 5: SOUND 1,60, 10 7::F 
OR A=PPXR-1 TO PPXR+1:FOR B=PPYR-1 TO PP 
YR+#1:1F C(A; B)<2s THEN 5040 ELSE PxRS A:P 
YR=B:MVI=50VI=VI+20:GOSUB 80 

5030 A=PPXR+ 1:B= PRYR: 1e” BURITE BOUCLE DE 
RECHERCHE 

5040 NEXT BE 

5050 NEXT À 

5060 REM 2EME PHASE:VICTUAILLES DEVOREES 
5070 REM ELIM VICTUAILLES ET ODEUR DE L’ 
ENTOURAGE 

5080 FOR A1i=PXR-1 TO PXR+1:FOR Bi=PYR-1 
TO PYR+1 

5090 C(A1,B1)=0 

5100 IF AÏ=PPXR THEN 5130 


10 
PYR THEN 5170 
Ai,B1: PRINT" * 


Det bee be fon be bot be ne 
Lou WC 
re 


SOUND, 1 , 1000, 20,7: SOUND 1 
6:SOUND 1,2000,30,7:FOR AT=1 TO 550 


: RETURN 
REM SSPROG TRAPPE 

6010 IF C(PXR,PYR) (25 THEN 6070 

6020 FOR FOTS= TO 4 

6030 SOUND 1500 10, 7:SOUND 1,2500,10,6 
:VI=VI- : 8080 

6040 PEN PPOCATÉ PKR, PYR: PRINT CHR$ (33) 


+ 


O=* © CH OI CA ON O1 O1 CA UA 


OZ= 
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FOR AT=1 TO 200:NEXT:PEN 2:LOCATE PXR,P 
YRIPRINT CHRS (122) 
6050 NEXT FOIS 
6060 PXR=PXR-1:PEN 1:LOCATE PXR,PYR:PRIN 
T ÉORS 33) 2 FOR AT=1 TO 700:NEXT’ 
6070 RETURN 
7000 REM SSPROG SONNERIE 
7010 IF VI)? THEN RETURN ELSE FOR FOIS=1 
TO 30:SOUND :FOR AT=1 TO 30:NEX 
T:NEXT FOIS: FOR Dtel” TO 500: NEXT AT 
7020 NS=INT(2XRND)+1:1F NS=i THEN 7040 
3030 PEN 2:LOCATE PXS2,PYS2: SPRINTrS TE N=P 
XS2:Y= =24:G0TO 7050’CAS SONNERIE NO2 CONC 
7040 PEN 2:LOCATE PXS1,PYS1:PRINT"$":X=P 
XS1:Y=3"CAS SONNERIE NÜ1 CONCERNEE 
7050 ES=17:TENT=0’1ERE TENTATIVE DE LOCA 
LISATION DE LA SONNERIE 
7040 PEN 2:LOCATE ES,Y:PRINT"?"°AFF POSI 
TION SUPPOSE 
7070 FOR AT=1 TO 250:NEXT AT:IF ES<>X TH 
EN 7120" MAUVAISE LOCALISATION, RENVOI A U 
NE NOUVELLE TENTATIVE 
7080 IF C(ES, EN IOUTHMEN SOUND 35,40,7:: 
VI=V1+10:GOSÛB 8000: :GOTO 7100” *BABRE 
7090 SOUND 1,1500 * PERDU 
7100 LOCATE Ï,3 PPRTN Q+< 
":LOCATE 1,4:PRINT" 
":LOCATE 1 
,23: PRINT" 
":LOCATE 1,24: PRINT" 


7110 PEN 1:LOCATE PXSi,PYSi:PRINT"'S":LOC 
ATE PXS2,PYS2:PRINT"S"?FOR AT=1 TO 100:N 

EXT: RETURN 

7120 TENT=TENT+1’TENTATIVE SUIVANTE DE L 
OCALISATION 

7130 IF ES)>X THEN ES=ES-16/(2"TENT) ELSE 
ES =ES+16/(2"TENT) 

7140 GOTO 7060’RENVOI VERDICT 

8000 REM SSPROG AFF VI 

8010 PEN 1:LOCATE 31,2:PRINT'VI=";VI;" " 
: RETURN 


Commentaires techniques 


e Les REM échelonnées dans le programme donnent les explications essen- 
tielles. 


e MVI : numéro de la boucle de consommation de victuailles. 
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e VI: potentiel vital du robot, affiché à l’aide d’un sous-programme 
spécial. 


e Le robot décide de se ravitailler si deux conditions sont simultanément 
remplies : 


Il est dans la zone odorante ; 


Il a faim : son potentiel vital est inférieur à la distance restant à par- 
courir pour rejoindre son maître. 


e Sous-programme ravitaillement : 


Le robot est dans une case contiguë à celle des victuailles, il commence 
donc à explorer tactilement les huit cases alentour à l’aide d’une bou- 
cle FOR NEXT ; 


Il se met alors à table, et les victuailles, ainsi que la zone odorante, 
sont éliminées par remise à zéro de la fonction logique C(I, J) pour 
les neuf cases intéressées. 


e Sous-programme sonneries : 


Le robot essaie de deviner l'emplacement exact de la sonnerie qui vient 
de retentir; en effet, son ouïe lui permet seulement de savoir si elle 
se trouve près du bord supérieur ou inférieur de l’écran; reste à en 
préciser la position horizontale PXS1 ou PXS2 suivant la sonnerie 
concernée ; 

Il procède par approches successives, en prenant chaque fois le milieu 
de l'intervalle que le programme lui désigne ; 

L'emplacement est ainsi rapidement trouvé, mais le robot ne gagne 
des points que si la sonnerie se trouve bien sur celle des deux rangées 
qu'il a explorée. 
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IX 


L'AVENIR AU SERVICE DU PRÉSENT — 
L'ANTICIPATION 


“L'avenir, c'est ce qui dépasse la main tendue.” 
L. ARAGON. 
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L'esprit, capable de plonger dans le passé pour en ürer des 
enseignements, est, chose beaucoup plus surprenante ne surprenant 
pourtant personne, également capable de se projeter dans l’avenir aux 
mêmes fins : tirer des enseignements d'événements non encore survenus. 

La concrétisation, dans un programme d'ordinateur, de cette opération 
mentale rocambolesque si courante, /'anticipation, conduit ceux qui s’y 
risquent à une surprise d’un autre genre, dont la réalité incontournable 
résiste à toute contestation philosophique : il est nécessaire, pour anticiper, 
de #26moriser l'avenir en le traitant comme un présent fictif, qui devient 
donc aussitôt un passé fictif. 

Imprégné de tout cela, une anticipation expérimentale consciemment 
vécue procure à celui qui s’y livre la délicieuse sensation d’un détriplement 
de la personnalité. Le lecteur masochiste pourra essayer par exemple de 
s’observer attentivement en même temps qu'il réfléchit à la meilleure 
manière de contourner un pilier au moyen de l’heuristique I de l'étape 
E28 ci-après. 

Cet exercice est pourtant pratiqué en permanence dans la vie de tous 
les jours, mais ses mécanismes sont heureusement inconscients. La pratique 
de l'I.A. passe nécessairement par l’autopsie impitoyable de ce 
phénomène. 

Les deux cas présentés dans ce chapitre sont relativement simples : : d’une 
part, l'anticipation n’y est faite qu'Z 4 profondeur 1, ce qui n’est déjà 
pas si mal, et d’autre part elle n’est pas soumise aux aléas du comportement 
d’un adversaire comme par exemple au jeu d'échecs. En effet, la cible 
de E27 est mobile mais son mouvement rectiligne uniforme est connu ; 
et la position du maître de E28 est fixe. 

La recherche d’un comportement d’anticipation est assez simple, comme 
nous allons le voir. Par contre, la concrétisation de ce comportement dans 
un programme conduit rapidement à une grande complexité en raison 
de l’augmentation exponentielle du nombre de cas à considérer. 

Aussi est-il assez plaisant, tous efforts terminés, de contempler le robot 
superman se livrer à des exploits dont les ressorts profonds finissent par 
échapper, par exemple en E29 où tout jalonnement est supprimé. 

L'on comprend mieux l’extraordinaire performance que peut constituer 
la conduite intelligente d’une action quelconque lorsque, au-delà de 
l'imagination et de la logique qu’elle requiert, l’anticipation y introduit 
les prodigieuses possibilités de la concentration et de la mémoire. 
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ÉTAPE E27 


UNE ANTICIPATION DE NAVIGATION... 
ET UN CONCOURS PROPOSE AU LECTEUR 


Présentation 


Nous retrouvons, dans cet exemple, à l'étape ES, un missile autoguidé 
poursuivant une cible mobile sur terrain nu. 

Il n’y a pas d'obstacles, 1l n’y a donc pas d’heuristique de dégagement. 
Seule l’heuristique de navigation est en cause. En ES c'était l’heuristi- 
que 2. 

Cette fois, le missile améliore son comportement. Au lieu de se diri- 
ger vers la cible en tenant simplement compte du lieu où elle se trouve, 
il anticipe sur les futures positions de cette cible et se dirige #» peu en 
avant d'elle. 

Il a pour cela toutes les informations voulues, puisque la cible est ani- 
mée d’un mouvement uniforme et que sa vitesse est connue. Elle reste 
constante entre deux rebondissements successifs. 

Ces données sont censées être portées en permanence à la connaissance 
du missile qui peut donc les utiliser à son profit. Il est également doté 
d’un sens de la vue lui permettant d'apprécier la direction et la distance 
de la cible (en ES, il ne pouvait en apprécier que la direction). 

L'heuristique utilisée est baptisée 6, elle constitue une amélioration 
de l’heuristique ‘‘ordinaire”” 2. 

Les deux relations simples qui fournissaient les deux composantes VXR 
et VYR de E5 conservent la même forme, mais comprennent un terme 
complémentaire d'aspect insolite dans lequel il est toutefois assez facile 
de discerner l'intervention de la vitesse de la cible (en grandeur et en 
direction) et de la distance à laquelle elle se trouve par rapport au mis- 
sile. Cette distance constitue en quelque sorte le bras de levier qui doit 
amplifier l'effet de l’anticipation. 

Curieusement, il s’agit donc de deux relations assez ‘compliquées, mais 
dont le formalisme recouvre en fait une idée simple : précéder le mou- 
vement de la cible. Ces relations sont bien de nature heuristique et non 
pas algorithmique, car elles ne découlent pas d’une analyse mathémati- 
que rigoureuse, et nul ne peut assurer qu elles conduiront au succès ou 
même qu’elles seront supérieures à tous coups à l’heuristique ordinaire 2. 

C’est une sorte de fonction d'évaluation de la situation de même nature 
intuitive que celle de E13, avec cependant une différence essentielle : 


le 


elle ne sert pas à comparer plusieurs positions en vue de choisir la meil- 
leure, elle agit directement, de façon ‘‘intégrée””, sur la vitesse du mis- 
sile en fonction de l’ensemble des données de la situation (positions, 
vitesses). C’est une fonction d'évaluation de situation, et non plus seu- 
lement de position. 

Cela est logique, s’agissant d'intervenir sur la navigation et non pas 
sur un dégagement , sur la stratégie et non pas sur la tactique, de recher- 
cher le #21eux et non pas le #oirs mal. 

Le seul moyen d’apprécier la valeur de ces formules consiste à en véri- 
fier l’efficacité sur le terrain. Pour ce faire, le programme ci-après met 
en compétition l’heuristique 2 et la nouvelle heuristique 6. Les deux mis- 
siles font tour à tour un pas, et que le meilleur gagne! 

On peut choisir au départ la vitesse de la cible dans la fourchette 0,5 
à 2 (cases par pas). Rappelons que la vitesse du missile est de une case 
par pas. 

On constate rapidement que, pour des vitesses de cible inférieures ou 
égales à 1, les deux heuristiques se valent ; la puissance physique des mis- 
siles, égale ou supérieure à celle de la cible, les dispense de voir plus loin 
que le bout du nez de cette dernière. 

Par contre, dès que la cible va un peu plus vite que les He (vites- 
ses supérieures à 1 — par exemple 1,3), l’anticipation révèle toute sa 
valeur, l'intelligence domine la puissance matérielle. 

Alors qu’en E5 la cible échappait souvent aux poursuites au-delà de 
1,2 ou 1,3, elle est ici rattrapée à tous coups par le missile à anticipation, 
même pour des vitesses de cible atteignant 2. 

Le score du match est affiché à l’écran pour permettre de suivre la gra- 
dation ; c’est dans les circonstances difficiles que les qualités s’affirment. 

Le lecteur pourra essayer d'améliorer l’heuristique 6 par tous moyens 
que son imagination lui suggérera. Puis il pourra mesurer le résultat de 
ses efforts en laissant l’heuristique 6 au missile qui la possède et en dotant 
le missile ordinaire de la nouvelle heuristique de son cru. 

Deux conditions sont simplement requises pour garantir l'honnêteté 
de toute nouvelle heuristique : seules les deux formules donnant VXMIO 
et VYMIO peuvent être manipulées, et ces deux composantes ne peu- 
vent pas prendre de valeurs supérieures à 1 en valeur absolue (donc, pas 
plus d’une case par pas). 

Il n’est pas nécessaire d’être mathématicien, mais il n’est pas mauvais 
de posséder un certain sens des formules. 


ve 


Programme 


100 ETAPE E27:COMME ES AVEC ANTICIPATIO 
PAR LE MISSILE,DU COMPORTEMENT DE LA C 
TRLES MISSILE AUTOGUIDE,CIBLE MOBILE TERR 
AIN NU,HEUR NAV (6) COMPETITION AVE L 
MISSILË "ORDINAIRE" DE ES (HEUR (2)) EN 


COULEUR PASTEL 

110 INK G,22:INK 1,1:1INK :INK 3,23:CL 

8: CLEAR: SÈ0=0: SCA=0” INIT SRORE 

120 SYMBOL ARIER 32: SYMBOL 85e &FO,&EO,&F 
&BB, WC, &F &4 

(26 CLS: SEEN’ T :LOCATE 4,11:PRINT"VITE 

8SE DE La CIBLE (DE 0,5 À ?) ?":LOCATE 2? 


13: PRINT"PUIS APPUYEZ SUR LA BARRE D’ES 


PACEMENT 

140 D$S=INKEYS:RANDOMIZE TIME:IF D$=" " T 
HEN 150 ELSE IF D$<"." OR D$>"9" THEN S0 
UND ! 5,7:FOR AT=i TO 200:NEXT:GOTO 1 


40 ELSE Re R+1: LAS (R) DS: PEN 1: LOCATE 17+R 
15:PRINT AS(R):SOUND 1,20,10,7:GOT0 140 
150 K+&=" ": FOR Z=1 TO R'K$= KB AE C2) ENEXT 
Z:K=VAL (K$) : ON ERROR Gû TO 

160 PEN 1:LOCATE 16, lé: D RINTUIT=n 5 K 

170 IF K<O.5 OR K>2 THEN SOUND 1,500,30, 

7:FOR AT=1 TO 1000: NEXT:GO0TO 130° 

180 FOR AT=1 TO 1000:NEXT:CLS:H= INT (2XRN 

D):1F H=1 THEN PXC=INT(1OXRND+8) :PYC=6 E 

LSE PXC=8:PYC=INT (10XRND+8) ’ TIRAGE Fog1T 


190 PFXC=PXC:PPYC=PYC 

200 PXMI=INT(25XRND) +9: PYMI=INTIOXRND+13 
: PPXMI=PXMI : PPYMI=PYMI’POSITION DEPART M 
ISSILE ET MISE EN RESERVE POUR EFFACEMEN 


210 PXMIO=PXMI: PYMIO=PYMI: PPXMIO=PXMIO:P 


NAIRE IDENTIQUE À CELLE DU PREMIER 
220 PEN 2:LOCATE PXC,PYC:PRINT'"o'":PEN 1: 
LOCATE PXMI PIVÉe aPRINT CHR$&(33) :LOCATE 3 
s L'PRINT'ORD="; 
ÿ"ANT=" ; SCA? ŸAFÉ CIBLE,MISSILES ET SC 


OR 
230 VXC=KXSGN (2Y#RND- 1) : VYC= KXSGN {2XRND - 1 
)’TIRAGE COMPOSANTES VITESE CI 
240 SOUND 1,200,80,7:FOR AT=1 #5 É2000: NE 
XT’ TOP DÉPART 

1000 REM BOUCLE DPES MOUVEMENTS 


1010 FOR M= 50 

te REM COMMANDE CHANGEMENT DE VITESSE C 
1030 CHF=INKEYS:IF CH#<)>" " THEN 1040 EL 
SE 110 


1040 REM MOUVMT CIBLE 
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1050 PXC=PXC+UXC: PYC=PYC+VYC’CALC NOUVEL 
LE POS CIBLE 

1060 GOSUB 3000’ EFFETS DE BORDS 

1070 PEN 2:IF CINT(PXC)<>40 OR CINT(PYC) 
{525 THEN LOCATE PPXC,PPYC:PRINT " ":LOC 
ATE PXC,PYC:PRINT"o":SOUND 1,100,5,7:PPX 
C=PXC:FPYC=PYC ELSE SOUND 1,53,10,7:PXC= 
59:VXC=-ABS (VXC) : VYC=-ABS (VŸC):GOTO 1070 
AFF CIBLE (SAUF POS 40,25 INTERDITE) ET 
MISE EN RES 
80, GOSUB 5000'CIBLE ATTEINTE 

© REM MOUVMT MISSILE ORDINAIRE,HEUR N 


2) 
O VXMIO=SGN(CINT (PXC) -PXMIO) : VYMIO=SG 
INT (PYC)-PYMIO): 

O PXMIO=PXMIO+VXMIO:PYMIO=PYMIO+VYMIO 
IF PPXMIO<>PPXMI THEN 1130 ELSE IF 
IO<>PPYMI THEN 1130  ELSE PEN 1:LOCA 
PXMIO, PPYMIO: PRINT CHR#(33):GOTO 114 


LOCATE PPXMIO,PPYMIO:PRINT" " 
PEN 3:LOCATE PXMIO,PYMIO: PRINT CHRS 
Fe HAE 1,30,537:PPXMIO=PXMIO: PPYMIO= 


REM MOUVMT MISSILE A ANTICIPATION,H 
ST NAV (2) AMÉLIORÉE 

UXMI=SGN (CINT (PXC) -PXMI+UXCYXABS (ABS 
T(PYC) -PYMI) -1) ) : VYMI=SGN (CINT (PYC) - 
+VYCKABS (ABS (CINT (PXC) -PXMI) -1) )" ADJ 
ON D'UN TERME COMPLÉMENTAIRE À L’HE 
(2) POUR TENIR COMPTE DE LA VITESS 
E LA CIBLE . 

© PXMI=PPXMI+UXMI: PYMI=PPYMI+UYMI 

0 GOSUB 4000’EFFETS DE BORDS 

O LOCATE PPXMI,PPYMI: PRINT" ":PEN 1:L 
TE PXMI,PYMI:PRINT CHRS (83) : SOUND 1,3 
: g 2: PPXMÉSPXMI : PRYMISPYMI * AFF ET MISÉ 

N RES 

200 GOSUB 5000’TEST CIBLE ATTEINTE 


1210 FOR AT=1 TO SO:NEXT:NEXT M 


1220 END 
2000 REM ZONE DES SOUS-PROGRAMMES 
3000 REM SSPROG EFFETS DE BORDS CIBLE 

IF CINT(PXC) >0 THEN 3020 ELSE SOUN 
PXC=1:VXC=-UXC 
(PXC)< 41 THEN 3030 ELSE SOU 
:PXC=40: UXC=-UXxC 
(PYC)>0 THEN 3040 ELSE SOUND 
YC=1:VYC=-VYC: RETURN 
(PYC)<26 THEN RETURN ELSE SO 
UND 1,53,10,7:PYC=25:UYC=-VYC: RETURN 
4000 REM SSPROG EFFETS DE BORDS MISSILE 


Dre 


<Nr0O vd 


DHAZOMOM-OO VTO 


"Orbk TZ<OrCr<Wrk MUC CO 
1" 
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A ANTICIPATION 
4010 IF PXMI>30 THEN 4020 ELSE PXMI=1:GOT 


4020 IF PXMI<41 THEN 4030 ELSE PXMI=40 
4030 IF PYMI>O0 THEN 4040 ELSE PYMI=1:RET 


(e) ne PYMI<26 THEN RETURN ELSE PYMI=25 


5000 REM SSPROG CIBLE ATTEINTE 

5010 IF PXMIO<)CINT(PXC) THEN 5020 ELSE 
IF PYMIO<)CINT(FYC) THEN 5020 ELSE PEN 
2:LOCATE PXMIO,PYMIO:PRINT CHR$(33) : SCO= 
SCO+1:GOT0 5030 

5020 IF PXMIC)>CINT(PXC) THEN RETURN ELSE 
IF PYMI<)CINT(PYC) THEN RETURN ELSE PEN 
2ILOCATE PXMI,PYMI: PRINT CHRS (33) : SCA=SC 

+ 


5030 FOR FOIS=1 TO 4:SOUND 1,27,5,7:FOR 
AT=1 TO 100:NEXT:NEXT:FOR AT=1 TO 800:NE 
XT:GOTO 180 


Commentaires techniques 


Il y a deux missiles dans la boucle de mouvement : le missile ordinaire, 
heuristique 2, et le missile à anticipation, heuristique 6. 


Le premier est affiché en teinte atténuée, le second en bleu. 


On distingue facilement le terme complémentaire de l’heuristique 6, 
en comparant les deux relations donnant les composantes VXMIO et 
VYMIO d’une part, et VXMI et VYMI d'autre part. 


La vitesse de la cible est introduite en début de programme à l’aide 
d’une instruction INPUT protégée par des garde-fous contre les erreurs 
de clavier. Après avoir formé la valeur de la vitesse, qui s’affiche pro- 
gressivement sur l'écran, on appuie sur la barre d’espacement pour lan- 
cer la poursuite. 


L'heuristique 2 ne nécessite pas d’effets de bords pour le missile ordi- 
naire qui reste toujours dans les limites d’écran. 


Par contre, les effets de bords sont indispensables pour l’heuristique 6 
du missile à anticipation. 


Lorsque les deux missiles atteignent la cible en même temps, la mar- 
que est magnanimement attribuée au missile ordinaire. 
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ÉTAPE E28 


UNE ANTICIPATION DE DÉGAGEMENT 
À PROFONDEUR 1 


Présentation 


Cette fois, c’est l’étape E13 qui servira de base, avec son robot, son 
maître, ses piliers, et ses heuristiques 1 et F. Et c’est l’opération de déga- 
gement F qui bénéficiera d’une anticipation, la nouvelle heuristique obte- 
nue étant alors baptisée I. 

Le principe en est simple. Lorsqu'il arrive sur un pilier, on sait que 
le robot, en appliquant l’heuristique F, trouve deux positions libres, l’une 
à droite et l’autre à gauche de l'obstacle. 

Mais au lieu de choisir comme en E13 la meilleure (ce qui constituait 
déjà une forme d'anticipation puisqu'il ne se déplaçait qu'après avoir 
repéré à blanc les deux positions possibles), il pousse plus loin ses simu- 
lations, son anticipation : de chacune des deux positions ainsi obtenues, 
il simule un pas supplémentaire au cours duquel il peut avoir ou non 
à contourner un autre pilier. 

On dit qu’il anticipe Z /a profondeur 1, alors qu’en E13 il ne s'agissait 
que de la profondeur 0. On dit aussi qu’il avance de deux branches sur 
l'arbre des mouvements). 

Il aboutit ainsi, dans le cas général, à guatre positions possibles, deux 
pour chacune des deux positions précédentes. Mais il ne rencontre pas 
forcément de pilier dans cette seconde tournée de simulations. Il peut 
ainsi aboutir, non pas à quatre, mais à trois ou à deux positions de pro- 
fondeur 1. C’est parmi elles que, à l’aide de la fonction d'évaluation déjà 
étudiée en E13, il choisit la meilleure et d’où il déduit la position de 
profondeur 0 à occuper. 

Il procède ainsi avant chacun de ses pas, tout au long du trajet. En 
résumé : 


en l'absence de pilier, le robot avance en utilisant son heuristique de 
navigation ; 


e au contact d’un pilier, il fait jouer son heuristique de dégagement F 
et trouve deux positions libres À et B possibles ; 


1. En fait, cet arbre est déjà bien élagué, puisque l’heuristique F n’en a conservé que deux branches. 
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e puis, à partir de chacune, il simule un pas en utilisant ses mêmes heu- 
ristiques 1 ou F suivant qu’il y a ou non un obstacle; 


e il trouve ainsi, en général, quatre positions A1, A2, B1, B2; 
e il les évalue et choisit la meilleure ; 


e enfin il occupe la position À ou B qui a donné accès à cette meilleure. 


L'efficacité du procédé est très grande. 

C'est un principe de même nature qui préside à l'élaboration du pro- 
gramme de jeux d'échecs, avec une complication supplémentaire : il faut 
anticiper, non seulement sur son prochain coup, mais aussi sur celui de 
l'adversaire (méthode dite du minimax). Les meilleurs programmes se 
fondent, d’une part sur la plus grande profondeur d’anticipation, et 
d'autre part sur la meilleure qualité de la fonction d'évaluation. 

Le programme démonstratif ci-après visualise par des points rouges les 
deux positions À et B de profondeur 0, et par des points d'interrogation 
les quatre (ou trois, ou deux) positions A1, A2, B1 et B2 de profondeur 1. 

Il arrive bien entendu que A1 et A2, ou B1 et B2, soient confondus 
s’il n’y a pas de pilier à contourner au cours de la seconde tournée de 
simulations. 

Le programme met par ailleurs en évidence la gymnastique assez 
complexe des instructions à mettre en œuvre dans l'ordinateur pour simuler 
toutes ces simulations. 

On voit aussi que, pour décrire des situations et des opérations de ce 
genre, la langue naturelle, aussi déliée soit-elle, trouve rapidement ses 
limites d'expression. 

Seul un langage plus rigoureux, dont la rigueur est d’ailleurs obtenue 
par un formalisme et par des règles de manipulation intransigeantes et 
rigides, peut surmonter les difficultés de représentation et de traitement. 

Le lecteur pourra essayer d’aller plus loin et d’atteindre la profondeur 2, 
obtenant donc huit positions possibles sur l’arbre des mouvements. L’exer- 
cice ressemble alors à celui du jongleur qui doit simultanément maîtriser 
les trajectoires de ses anneaux, de ses balles et de ses torches, mais quelle 
splendeur dans le spectacle, pour qui devine les ressorts profonds! 

Rien n'’interdit en théorie d’anticiper le meilleur parcours complet pos- 
sible : il suffit d’aller à la profondeur 30, c’est-à-dire de simuler 
2 puissance 31 possibilités, soit un peu plus de deux milliards. Il est 
moins fatigant, plus raisonnable , plus heuristique, de renoncer à cette 
débauche combinatoire et de laisser Roméo se livrer à ses promenades 
de E23, quitte à lui en faire accomplir une centaine : il est Z peu près 
sär (cette formule pourrait devenir la devise des heuristiciens) que l’une 
d’elles, judicieusement retenue par le robot, serait la perle convoitée. 


ATT 


Programme 


100 ’ETAPE E28:COMME E13 AVEC ANTICIPATI 
ON "A PROFONDEUR 1" DE L’HEURISTIQUE DE 
PEACE (F) POUR OBTENIR L'HEURISTIQUE 


lo 1 0,22:INK 1,1:1INK 2,6:INK 3,14:CL 


120, DIM C(38,25)TABLEAU DES COORDONNEES 
DES S DE L *ECRAN SUSCEPTIBLES DE RE 
CEVOIR ON PILIER 
130 SYMBOL AFTER 32:SYMBOL 33,&0,87C,&D6 
,kéC,&38 &PE, &7C, LéC * DESSIN ROBOT ; DESSIN 
MAITRE : CODE 250” 
140 REM NB ALÉATOIRES VARIES 
150 RANDOMIZE TIME 
160 RG=1:SIM=0’INIT RANG DU PARCOURS RG 
ET RANG DE LA SIMULATION SIM 
120 CLS:HSINT (2XRND) TE H=1, THEN, PXMSINT 
(2SKRND+ 6) :PYM2O ELSE PXM=6:FYHDINT (IR 
ND+6) * TIRAGE POSITION MALTRE 
180 PXR=36: PYR=21 : PPXR=PKR: PPYR=PYR: PPXR 
SPXR: PPYRI=PYR POS DÉPART ROBOT MISE EN 
PRÉSERVE POUR CALCULS DE SIMULATION (PPX 
PPYR) ET MISE EN RES POUR TRACE 
T50 PEN T:LOCATE PXR,PYR:PRINT CHR$(33) 
PEN 2:LOCATE PXN, PYME PRINT CHRS (290) * AFF 
ROBOT ET MAITRE’ 
200 IF RG)>1 THEN 280 
210 FOR N=0 TO 30:TERR#=INKEY#:IF TERRSK 
MO" THEN 220 ELSE 110 
220 I=INT((33-PXM) XRND) +PXM-1:J=INT((21- 
PM) / (0 PAM KT PEM) D # INT ( (OYRNDO 2) #1 = 
PXM) /8) +PYM+1 
230 IF J)PYM-2 THEN 250 
240 J=PYM-1:GOTO 270 
250 IF J{)>PYM THEN IF J<22 THEN. 270 ELSE 
J=21:GOT0 270 
260 IF IC>PXM THEN 270 ELSE J=PYM- 
270 PEN 1:LOCATE I,J:PRINT"=":C(I, D=iin 
EXT'AFF ET RÉPRESENT AT ION PILIER 
280 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 
XT'TOP DEPART 
1000 REM BOUCLE DES MOUVEMENTS 
1010 FOR M=1 TO 50°50 MOUVMTS MAXI ADMIS 
POUR ATTEINDRE MAITRE 
1020 TERRS=INKEYS:1F TERR#()>" " THEN 103 
0 ELSE 110 


1030 IF PXR<>PXM THEN NUME=ABS (PYR-PYM) : 
DENO=ABS (PXR-PXM) : IN=NUME/DENO ELSE 1060 
’HEUR NAV (1) 

2e CO 10 1e. S THEN VXR=SGN(PXM-PXR) : UYR 
1050 IF INs2 THEN VXR=O:VYR=SGN(PYM-PYR) 


re 


: GOTO 1070 

1060 VXR=SGN (PXM-PXR) : VYR=SGN (PYM-PYR) 

1070 TT=O’'INITIALISATION DU RANG TT DES 

PE SRE POUR TROUVER UNE POSITION LIB 
APRES HEURT PILIER OÙ RETOUR EN ARRIE 


RE 

1080 PXR=PPXR+UXRBEPYR=PPYR+UYR 

1090 IF PXR>33 THEN 1610 ELSE GOSUB 3000 
TEST HEURT PILIER 

1100 IF OBS=0O THEN 1110 ELSE 1080’RECALC 
UL POS 

1110 IF RET=O THEN 20 5 1080 

1120 IF M<>MPI THEN 13 

130 KREM HEURIST DE DEGT (F):ESSAI AUTRE 
ENS D’EXPLORATION 

O IF ESS=1 THEN 1190 ELSE PXRI=PXR:PY 
PYR: Die VXR: VYRI=VYR’MEMO 1ERE POS ( 
I SIM=O,A1 SI SIM=1, SI SIM=2) 

O IF STH20 THEN PEN’3:LOCATE PXR PYR: 
NT'"-" ELSE PEN 2: LOCATE PXR,PYR: PRINT 


O0 FOR AT=1 TO 100:NEXT:SSS=SS:IF Sss= 

THEN SS=0 ELSE SS=1’INVERSION SENS DE 

EE 

70 TT=2:ESS=1: CAC UE ER 3250 

80 GUTO 1080? RECA LCUL POS 

90 ESS=0:MPI-= O°RÉINIT ESS ET MPI 

00 PXR2=PXR: PYR2=PYR: VXR2= Le VYR2=UYR 

LS 2EME POSITION (B SI SIM=0,A2 SI SI 
B2 SI SIM=2) 

18 IF SIM=Q THEN PEN 3:LOCATE PXR,PYR: 

INT" - " ELSE PEN 2:LOCATE PXR,PYR: : PRINT 


220 REM CALCUL DES 2 DISTANCES CISTI ET 
IST2 AU MAITRE 

30 IF SIM=O THEN 128O0'VERS LE DEBUT DE 
IMULATIONS 

O HOR1=ABS (PXM-PXR1) : VERTI=ABS (PYM-PY 
ERP V ER THEN DISTI=HORI ELSE 
HOR2=ABS (PXM-PXR) : VERT2=ABS (PYM-PYR 
SÉSVERTE THEN DIST2=HOR2 ELSE DIS 


F_SIM=2 THEN 1270 ELSE DISTAI=DIST 
A2=DIST2:PXRA1= PE PYRAÏ=PYRI1:PXR 
2:PYRA2=PYR2:P11=1:GOTO 1280” CAS S 
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ES TELLES QUELLES 
1280 SIMSSIM#I: IF SIM=2 THEN 1340 

1290 REM SIM=1:MEMO DES 2 POS À ET, B D’0O 
U VONT SE FAIRE LES 2 SIM 1 ET 2 PAS 

SUIVT DU ROBOT,ET DES VITESSES ÉORRESPON 
DANTES POUR EVIÎTER LES RET ARR 

1300 PXRA=PXR1 : PYRA=PYR1 : VXRA=UXRI1 : VYRA= 
VYRL : PXRB=PXR2 PYRE=PYR21 VXRE=UXR2 : UYRE= 
1310 M=M-2’RETROGRAD M POUR COMPENSER LE 
8 2 BOUCLES DE SIMULATION ET EVITER FIN 

DE FARCOURS PREMATUREE (M>50) 

1320 REM 1ERE SIM (A PARTIR DE A) 

1330 PXR=PXRA: PYR=PYRA: VXR=VXRA : VYR=UYRA 
:GOTO 1630 

1340 RÊM 2EME SIM (A PARTIR DE B) 

1350 PXR=PXRB: PYR=PYRB: VXR=VXRE: VYR=UYRBE 
:GOTO 1630 

1360 REM PAS DE PILIER 

1370 IF SIM=0 THEN 1610 ELSE PXR3=PXR:PY 
R3=PYR:PEN 2:LOCATE PXR,PYR:PRINT"?":HOR 
STARS (PXM=PXRS) : VERTS8= =AËS (PYM-PYR3) ’ CAS 

1380 IF HOR3<VERT3 THEN DIST3=VERT3 ELSE 


1390 IF SIM=1 THEN DISTAI=DIST3:DISTA2=1 
00:PXRAS3S=PXR3: PRSSE PYR3:P11=0:GOTO ad 
POS A1 OBT A PARTIR DE A:MEMO DISTA1,DI 
STA2 FICTIVE + PÉLEVRE MEMO POS POUR EFFT 
4 er PNAENT PAS DE PIL AU COURS 1ERE S 
1400 IF SIM=2 THEN DISTBI=DIST3:DISTB2=1 
00:P12=0’COMME 1390 MAIS INUTILE MEMO PO 
CAR PXR3/PYR3 SERONT UTILISES TELS QUE 


S 

LS 

1410 REM CHOIX PLUS COURTE DISTANCE AU M 
AITRE DES 4 POS A1,A2,B1 E 2 

1420 IF DISTAI<DISTAZ THEN 1470 

1430 IF DISTAZ2<DISTB HEN 1460 

1440 IF DISTBI<DISTB2 THEN 1530 

1450 DIST=DISTB2 :GOTO 1550 

1460 IF DISTA2<DISTB2 THEN 1510 

1470 IF DISTA1<DISTB1 THEN 1490 

1480 GOTO 1440 

1490 IF DISTA1<DISTB2 THEN 1520 

1500 GOTO 1450 

1510 DIST=DISTA2: GOTO 1540 

1520 DIST=DISTAI:GOTO 1540 

1530 DIST=DISTB1: GOTO 13550 

1540 PXR=PXRA: PYR=PYRA: VXR=VXRA: VYRZ=VYRA 
: GOTO 1560 


1550 PXR=PXRB: PYR=PYRB: VXR=VXRBYVYR=UYRE 
2re REM REINIT SIM ET EFFT POS PROVISOI 
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1570 FOR AT=1 TO 300:NEXT:SIM=0:LOCATE P 
XRA, PYRA: PRINT" ":LOCATE PXRB, PYRB: PRINT 


1580 IF PI1=0 THEN LOCATE PXRA3,PYRA3:PR 
INT" _" ELSE LOCATE PXRA1,PYRAL: :PRINT" *: 
LOCATE PXRA2,PYRA2:PRINT 
1550 IF PI2=0 THEN LOCATE PXR3 PYR3: PRIN 

" ELSE ÉOCATE PXR1 , PYR1 : :PRINT" ":LOC 
TE PXR2, PYR2:PRIN 
1600 IF DIST{>0O THEN 1610 ELSE PEN 2:LOC 
ATE PXM,PYM:PRINT CHRS&(250 

10 PEN 1:LOCATE 31,1:PRIN NT Mj"":PEN 3: 
LÉCATE PPXRT, PPYRT: PRINT CHRS (33) : SOUND 
1:59,5 7:PEN 1:LOCATE PXR,PYR:PRINT CHRS 
AFF TRACE ET ROBOT 
1620 PPXRT= =PXR: PPYRT=PYR’MEMO POS POUR T 
1630 PPXR=PXR:PPYR=PYR: VUXR=UXR : VUYR=UYR 
MEMO POS ET VIT POUR CALCULS ULT 
1640 IF SIM(>0 THEN 1650 ELSE GOSUB 4000 
THDPATIENSS REJOINT (SAUF PENDANT LES S 
1650 N=1 TO 40: NEXT:NEXT M 
1820 SOUND 1,300 7:RG=RG+1:IF RG=6 TH 
EN 110 ELSE PEN à: SPOCATÉ PXR.PYR:PRINT"C 
ERS13S) EUR Atel 10 1000: NERT: É0TO 180’P 
ARCOURS NON REUSSI 


O END 

2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG HEURT PILIER ET/OU RETOU 

R EN ARRIÈRE 

3010 OBS=0:RET= 

3020 REM TEST PÎLIER 

3030 IF C{BXR, PYR)=1 THEN 3040 ELSE 3050 

FOR AT=1’ TO SO:NEXT:SOUND 1 5,7: 

PEN 2: ÉOCATE: PXR, PYR: PRINT ES D FOR à +2 17 

O SO:NEXT:PEN 1: LOCATE PXR,PYR:PRINT"=": 
OBS=1:GOTO 309 

3030 BEM TEST RETOUR ARRIERE 

3060 IF VXR=-VVXR THEN IF VYR=-VUYR THEN 
3070 ELSE RETURN ELSE RETURN 

3070 IF TT>7 THEN RETURN ELSE FOR AT=1 T 
O SO:NEXT AT:SOUND 1,20,5,7:PEN 2:LOCATE 
PXR, PYR:PRINT"'#":FOR AT= a TO SO:NEXT: PE 

N 3:LOCATE PXR,PYR:PRINT CHRS (33) :RET= 
3080 IF PXRCOPBXRT OR PYRCOPPYRT THEN PE 

N 3:LOCATE PXR,PYR:PRINT CHR$(33) ELSE P 
EN 1:LOCATE PxR PYR:PRINT CHR$ (33) 

3090 FOR AT=1 TO 100:NEXT:TT=TT+1:MPI=M" 

MEMO NO BOUCLE 

3100 REM ESSAI NOUVELLE DIRECTION:HEURIS 
T DEGMT (1) 

3110 FOR AT=1 TO 100:NEXT AT:IF TT>1 THE 

N 3250’CAS 2EME PASSAGE ET SUIVANTS 
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20 _IF VXR=-1 THEN 3150’CAS 1ER PASSAGE 
ETERMINATION DE LA DIRECTION Di DU 1ER 


31 

3: D 

HEUR 

3130 IF VXR=O THEN 3180 

3140 IF VXR =1 THEN 3200 

3150 IF VYR=-1 THEN D1=5:GOTO 3230 
3160 IF VYR=O THEN Di=é6:GOTO 3230 
3170 IF VYR=1 THEN D1=7:GOTO 3230 
3180 IF VYR=-1 THEN Di=4:GOTO 3230 
3190 IF VYR=1i THEN Di=8:GOTO 3230 
3200 IF VYR=-1 THEN D1=3:GOTO 3230 
3210 IF VYR=O THEN Di=2:GOTO 3230 
3220 IF VYR=1 THEN D1=1 

on D=D1’DIRECTION D DEBUT DE L'EXPLORA 


3240 Ur 0 PAREDIE FERAGE SENS DE L’EXPL 


3250 REM EXPLORATION POSITION SUIVANTE 
3260 IF SS=0 THEN D=D+1:1F D<9 THEN 3280 
ELSE D=D-8:GO0OT0 3280 

3270 D=D-1:IF D>0 THEN 3280 ELSE D=D+8 
3280 IF D=1 THEN 3290 ELSE IF D=2 THEN 3 
300 ELSE IF D=3 THEN 3310 ELSE IF D=4 TH 
EN 3320 ELSE IF D=5 THEN 3330 ELSE IF D= 
6 THEN 3340 ELSE IF D=7 THEN 3350 ELSE 3 


3 

3290 VXR=1I1: VYR=1: GOTO 3370 

3300 VXR=1:VYR=O: GOTO 3370 

3310 VXR=I: VYR=-1: GOTO 3370 

3320 VXR=0:VYR=-1:GOTO 3370 

3330 VXR=-1:VYR=-1:GOTO 3370 

3340 VXR=-1:VYR=0:GOTO 3370 

3350 VXR=-1:VYR=1: GOTO 3370 

3360 VXR=O:VYR=I 

3370 RETURN 

4000 REM SSPROG MAITRE REJOINT 

4010 IF EC CECUON THEN RETURN ELSE IF PYR 
<>PYM THEN RETUR 

4020 FOR FOIS=1i To 4: SOUND 1,27,5,7:FOR 

AT=1 TO 100:NEXT:NEXT 

4030 FOR AT=1 TO S00:NEXT:RG=RG+t1:1IF RG 

5 THEN PEN 3:LOCATE PPXR,PPYR: PRINT cÜRS 
(33): GOTO 180 ELSE 110 


Commentaires techniques 


e Des REM ont été placées en lieux opportuns pour éclairer le chemine- 
ment des opérations d'anticipation. 


e Tant que Roméo ne rencontre pas de pilier, le programme se déroule 
comme en E13 : OBS et RET = 0, avancement d’un pas suivant l’heu- 
ristique 1. 
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Devant un pilier, OBS = 1 et MPI = M, comme en E13. En outre, 
intervient alors le paramètre SIM (simulation) initialisé à O0 en début 
du programme. 


Après la détermination des deux positions A et B par la méthode habi- 
tuelle de E13, ces positions sont repérées sur l’écran par des points rou- 
ges. On ne calcule pas leur distance au maître, car ils ne sont que les 
points de départ des deux simulations suivantes, l’une à partir de A 
(SIM = 1)et l’autre à partir de B (SIM = 2). 


SIM est d’abord incrémenté de 1 et prend donc la valeur 1. 


Le programme mémorise les deux positions À et B et les vitesses d’arrivée 
correspondantes pour veiller à la condition de non-retour en arrière 
des mouvements de simulation suivants. 


À partir de À, le programme simule un nouveau pas en prenant pour 
valeur de départ (PXR, PYR, VXR, VYR) les données ci-dessus relati- 
ves au point À. On obtient ainsi une position unique A1 s’il n’y a 
pas eu de pilier, ou deux positions A1 et A2 s’il y a eu un pilier. 


La fonction d'évaluation calcule alors les distances DISTA1 et DISTA2 ; 
s’il n’y a pas eu de pilier, on prend une distance fictive DISTA2 = 100 
qui sera, par la suite, toujours rejetée. 


SIM est alors incrémenté de 1 et prend la valeur 2. 


Un autre pas est alors simulé dans les mêmes conditions à partir de 
B et aboutit à une ou deux positions possibles B1 et B2, affectées des 
distances DISTB1 et DISTB2. 


C'est entre ces quatre distances DISTA1, DISTA2, DISTB1 et DISTB2, 
dont une ou deux peuvent être fictives, que le programme choisit la 
plus courte. Si c’est A1 ou A2 qui l’emporte, c’est le point À qui sera 
occupé par le robot, sinon c’est le point B qui sera choisi. 


Ces opérations sont simples dans leur principe, mais nécessitent tout 
un arsenal de paramètres et de variables accessoires qu’il faut mémori- 
ser pour les comparaisons, les simulations, et pour ne retenir finale- 
ment que les valeurs utiles. 


Les deux, trois ou quatre points finaux A1, A2, B1 et B2 sont visuali- 
sés par des points d’interrogation sur l’écran ; de même tous les heurts 
de pilier, les retours en arrière et les explorations sont jalonnés audio- 
visuellement comme en E13. 

Le sous-programme heurt pilier comporte par ailleurs une boucle 
d’attente pour freiner légèrement les opérations et permettre leur suivi. 


— 183 — 


ÉTAPE E29 
DES ALLER ET RETOUR À BLANC 


Présentation 


Le scénario de cette étape est le même que le précédent mais, comme 
nous l’avons déjà fait antérieurement, le jalonnement audiovisuel de l’heu- 
ristique I a été supprimé et seule subsiste l’action, la marche sûre et sereine 
de Roméo vers son maître. 

On peut constater qu’il n’est guère possible de faire mieux... 

Mais le moment est venu, par souci d’honnêteté, de se pencher à nou- 
veau sur les moyens sensoriels mis en œuvre par le robot. 

En effet, nous avons toujours pris soin de bien préciser ces moyens dans 
les programmes précédents, sauf en E13-E14 pour l’heuristique F et en 
E28-E29 pour la présente heuristique I. C’est que, dans les deux cas, la 
situation est délicate. 

En E13 et E14, on peut admettre à la rigueur que le robot penche son 
corps vers les deux positions, contiguës à la sienne, susceptibles d’être 
occupées, et apprécie visuellement les deux distances au maître sans avoir 
à se déplacer. 

Mais en E28 et E29 la chose est impossible, et le seul moyen pour un 
robot réel consiste à faire véritablement les deux, trois ou quatre dépla- 
cements de simulation (simulation réelle, paradoxe des mots...) sur la 
pointe des pieds, de comparer, en revenant chaque fois sur ses pas. 

Lorsque tout ce manège est terminé, il effectue d’un air dégagé le véri- 
table pas. L'expression y a/ler par quatre chemins prend ainsi toute sa 
saveur. 

Curieusement, c’est donc le programme E28 avec son jalonnement, 
et non pas celui-ci, qui correspondrait au véritable comportement d’un 
robot ‘‘en chair et en os’’. 

Il n’en reste pas moins que l'itinéraire complet, mémorisé par le robot 
au cours de la première exécution, peut être ensuite brillamment répété 
sans supercherie suivant la méthode de E20. 


Programme 


100 ETAPE E29:COMME E28 SANS SONO NI VI 
SUALISATION DES SIMULATIONS DE L’HEURIST 
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E DEGAGEMENT (I) 
0,22:INK 1,1:INK 2,6:INK 3,14:CL 


25) ? TABLEAU DES COORDONNEES 
S CASES DÉ L'ECRAN SUSCEPTIBLES DE RE 


1ER 

130 SYMBOL AFTER 32:SYMBOL 33,&0,&7C,&D6 
,&6C,&38,&FE, W7C, &6C” DESSIN ROBOT; DESSIN 
"MAITRE: CODE 250 

140 REM NB BLÉDTOIRES VARIES 

150 RANDOMIZE TIME 

160 RG=1:SIM=0" INIT RANG DU PARCOURS RG 

ET RANG TEL A SIMULATION S1M 

170 CLS:H=INT(2XRND):IF H=1 THEN PXM=INT 
(25XRND+6) :PYM=6 ELSE PXM=6:PYM=INT (12XR 

ND+6)”TIRAGE POSITION MAITRE 

180 PXR=36:PYR=21:PPXR=PXR: PPYR=PYR: PPXR 
T=PXR:PPYRT=PYR’POS DEPART ROBOT,MISE EN 
RFESERVE POUR CALCULS DE SIMULATION (PPX 

PPYR) ET MISE EN RES POUR TRACE 

F80 PEN 1:LOCATE PXR,PYR:PRINT CHR$(33) : 
PEN 2: D OCATE PXM, PYMIPRINT CHRS&(250)°AFF 
ROBOT ET MAITRE 

200 IF RG>1 THEN 280 

510 FOR N=0 TO 30:TERR$=INKEYS:1F TERRS 
>" "THEN 220 ELSE 110 

220 I=INT((33-PXM)XRND) +PXM-1:J=INT((21- 


OO mr 


BYM) / 1307 -PXM)X(I- RD INT C(SÉRND 2) # (1 
PXM)/8) +PYM+1 

230 IF J>PYM-2 THEN 250 

240 J=PYM-1:GOTO 270 


250 IF J<>PYM THEN IF J<22Z THEN 270 ELSE 
J=21:G0T0 270 

260 IF I<>PXM THEN 270 ELSE J=PYM- 

270 PEN 1:LOCATE I,J:PRINT"=":C(I, D=1: N 
EXT'AFF ET REPRÉSENTATION PILIER 

280 SOUND ares 80,7:FOR AT=i TO 2000:NE 


1000 REM BOUCLE DES MOUVEMENTS 

1010 FOR M=1i TO 50? cu CHR e MAXI ADMIS 
POUR ATTEINDRE MAIT 

1020 TERR$S=INKEYS: 1F RTERRS< >" " THEN 103 
O ELSE 110 

1030 IF PXRÇ>PXM THEN NUME=ABS (PYR-PYM) : 
DENO= FRANS -PXM) : IN=NUME/DENC ELSE 1060 
*HEUR NAV (1 

1040 IF IN<O, 5 THEN VXR=SGN(PXM-PXR) : VYR 
=0:GOTO 1070 

1050 IF IN>2 THEN VXR=0O:VYR=SGN(PYM-PYR) 
: GOTO 1070 

1060 VXR=SGN(PXM- -PXR) : VYR=SGN(PYM-PYR) 
1070 TT=0’INITIALISATION DU RANG TT DES 
TENTATIVES POUR TROUVER UNE POSITION LIB 
RE APRES HEURT PILIER OÙ RETOUR EN ARRIE 
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RE 

1080 PXR=PPXR+VXR: PYR=PPYREUYR 

1090 IF PXR>33 THEN 1610 ELSE GOSUB 3000 
TEST HEURT PILIER 

1100 2e OBS=0 THEN 1110 ELSE 1080’RECALC 


(a) 
O IF RET=0 THEN 1120 ELSE 1080 
IF M>MPI THEN 1360 

REM ESSAI AUTRE SENS D’EXPLORATION 
IF ESS=1 THEN 1190 ELSE PXR1=PXR:PY 
YR: VXRI=VXR: VYRI=VYR’'MEMO 1ERE POS 
See Ai SI SIM=1,B1 SI SIM=2) 

IF SSS=1 THEN SS=0 ELSE SS=1"’INVERS 
SENS DE ROTATION 
TT=2:ESS=1:D=Di:GOSUB 3250 

GOTO 1080’RECALCUL POS 
ESS=0:MPI=O0O’REINIT ESS ET MPI 

PXR2= Fa PYR2=PYR? Au ZEME POSITIO 
SI SIM=0,A2 SI SIM=1,B2 SI SIM=2) 
VXR2= UXR! VYR2=VYR? NEMO VITESSE 

REM CALCUL DES 2 DISTANCES DISTI ET 


RE 
THEN 1280’VERS LE DEBUT DE 


HOR1=ABS (PXM-PXR1) : VERTI=ABS (PYM-PY 
IF HORI>VERTI THEN DISTI=HOR1 ELSE 


RTi 
HOR2=ABS (PXM-PXR) : VERT2=ABS (PYM-PYR 
HORZ2>VERT2 THEN DIST2=HOR2 ELSE DIS 


RT2 

IF SIM=2 THEN 1270 ELSE DISTA1=DIST 
TA2= D1ST2, PXRAi= 1 PYRAÏ=PYR1:PXR 
R2Z:PYRAZ=PYRZ:PIli=i: GUIU 1280’ CAS S 
2 POS Ai ET A2 GET A PARTIR DE A,ME 


— 
N 
2 
C 
Z 
> 
41 
— 


CELL] 


OO -BLUOMANE- ONONZO UNION il SNS 


DOS Se ICE OMS SNOSSS OOHTOOO 
+ 
u 
[da] 
el 
Z 
il 
[e] 


RENC À URS 1ERE SIM 
ISTBI=DISTI:DISTÉ2=DIST2:P12=1:GOT 
CAS SIM=2:2 POS OBT À PARTIR DE 

MO DISTCES ET SIGNALMT PIL RENC AU € 
S ?EME SIM; INUTILE MEMORISER POS PXRI 
/PYRI ET PXR2/PYR2 QUI VONT ETRE UTILISE 
ES TELLES QUELLES 
1280 SIM=SIM+1:1F SIM=2 THEN 1340 
1290 REM SIM=1:MEMO DES 2 POS À ET B D’0 
U VONT SE FAIRE LES 2 SIM 1 ET 2 DU PAS 

UIVT DU ROBOT,ET DES VITESSES CORRESPON 
DANTES POUR EVIÎTER LES RET ARR 
1300 PXRA=PXR1 : PYRA=PYR1 : VXRA=UXRI1 : VYRA= 
Ne 


Es DEC 2°’ RETROGRAD at POUR COMPENSER LE 
2 BOU LES DE SIMULATION ++ EVITER FIN 
DE PARCOURS PREMATUREE {(M>50 


me Zaire X 0 


OO Tmlrmd-L DOTE membre bhehe D These het ( 
OCT 
[ER 
=) 
T 
ie 
Fr 
Z 
Q 
CC 
[el 
© 
[= 
m 


Ce NWOOZN:: 
rot) 


— 186 — 


1320 REM 1ERE SIM (A PARTIR DE A) 

Te FRS =PXRA:PYR=PYRA: VXR=VXRA: VYR=UYRA 
1340 REM 2EME SIM (A PARTIR DE B) 

ESS ban =PXRB: PYR=PYRE: VXR=VXRE: VYR=VYRE 
1360 REM PAS DE PILIER 

1370 IF SIM=O THEN 1610 ELSE PXR3=PXR:PY 
R3=PYR: HOR3=ABS (PXM-PXR3) : VERT3=ABS (PYM- 
PYR3)'CAS SIM=1 OÙ 2 

1380 IF HOR3SKVERT3 THEN DIST3=VERTS ELSE 


=HOR3 
1390 IF SIM=1 THEN ESP 0 Gore Sel 
00:PXRAS3S=PXRS: PYRAS=PYRS: PI11=0: GOTO doc 
POS Ai OBT À PARTIR DE A: MEND DISTA1 
STA2 FICTIVE + ELEVEE,MEMO POS POUR ÉÉFT 
SE. ;s SIGNALMT PAS DE PIL AU COURS 1ERE L 


1400 IF SIM=2 THEN DISTBI=DIST3:DISTB2=1 
O:PI12=0’COMME 1390 MAIS INUTILE MEMO PO 
CAR PXR3/PYR3 SERONT UTILISES TELS QUE 


O REM CHOIX PLUS COURTE DISTANCE AU M 
RE DES 4 POS A1,A2,B1 ET B2 
IF DISTAICDISTAZ THEN 1470 


IF DISTA2<DISTB1 THEN 1460 
IF DISTBI1<DISTB2 THEN 1530 
DIST=DISTB2 :GOTO 1570 

IF DISTA2<DISTB2 THEN 1510 
IF DISTAI<DISTB1 THEN 1490 
GOTC 1440 

IF DISTA1<DISTB2 THEN 1520 
GOTO 1450 

DIST=DISTA2:GOTO 1540 
DIST=DISTAI: GOTO 1540 
DIST=DISTB1:GOTO 1570 


PXR=PXRA:PYR=PYRA 

UXR=UXRA : UYR=UYRA 

GOTO 1590 

PXR=PXRB: PYR=PYRE 

UXR=UXRE : VYR=UYRE 

REM REINIT SIM 

SIM=0 

PEN 1:LOCATE 31,1:PRINT M;"":PEN 3: 

ÊTE PPXRT PPYRT: SPRINT CHRS (33) : SOUND 
7:PEN°1:LOCATE PXR,PYR:PRINT CHRS$ 

ET TA TRACE ET ROBOT 

RM PPXRTS PXR:PPYRT=PYR'MEMO POS POUR T 


1630 PPYR= PXR: PPYR=PYR: VUXR= ie VUYR=UYR 
*MEMO POS ET VIT POUR CALCUL LT 

1640 IF SIM<)>0 THEN 1650 ÉLSE COQUE 4000 
? TEST MAITRE REJOINT (SAUF PENDANT LES S 
IMULATIONS) 


MDOCO0O0OO00000000000000C 


HT ee ee bee be be bé bee be be ele behehehepete Def ÜUO 
ROOMS NE CRE QE 


We ONDUUUONUNNUUUBLLESERLENMEUN 


uw 
pu 


INT — 


1650 NEXT: NEXT M 
1660 SOUND 1,500,40,7:RG=RG+1:IF RG=6 TH 
EN 110 ELSE TEEN B: PBCATE PXR, PYR: PRINT 
HR$ (33) : FOR AT= A 10 1000:NEXT:GOTO 180” 
ARGOURE NON RE 


ND 

2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG HEURT*PILIER ET/OU RETOU 

R EN ARRIER 

IS Re DARED res 

302 

3030 IF C(PXR PYR) SI THEN 3040 ELSE 3050 

3040 OBS=1:G0T0 

3050 REM TEST RETOUR ARRIERE 

3060 IF VXR=-VUXR THEN IF UYR=- VUYR THEN 
3070 ELSE RETURN ELSE RETU 

3070 IF TT>7 THEN RETURN ÉLSE RET=1 

3080 TT=TT+1 

3090 MPI=M’MEMO NO BOUCLE 

3100 REM ESSAI NOUVELLE DIRECTION:HEURIS 


T DEGMT (I) 

3110 IF Nr: THEN 3250’CAS 2EME PASSAGE 
ET he rt 

3120 IF KR=-1 THEN 3150'CAS 1ER PASSAGE 
: DÉTERMINAT TON DE LA DIRECTION D1 DU 1ER 
3130 IF VXR=0O THEN 3180 

3140 IF VXR =1 THEN 3200 

3150 IF VYR=-1 THEN Di=5:GOTO 3230 

3160 IF VYR=O THEN Di=6:GOTO 3230 

3170 IF VYR=1 THEN Di=7:GOTO 3230 

3180 IF VYR=-1 THEN D1=4:GOTO 3230 

3190 IF VYR=1 THEN Di=8:GOTO 3230 

3200 IF VYR=-1 THEN D1=3:GOTO 3230 

3210 IF VYR=O THEN Di=2:GOTO 3230 

3220 IF VYR=1 THEN D1=1 

on D=D1’DIRECTION D DEBUT DE L'EXPLORA 


DÉS ION INT (2XRND) 'TIRAGE SENS DE L’EXPL 
3250 REM LE NE POSITION SUIVANTE 
3260 IF SS=0 THEN D=D+1:1F D<9 THEN 3280 
SC D D=D- 8° GOTO 3280 

3270 D=D- IF D>0 THEN 3280 ELSE D=D+8 
3280 TE D=i THEN 3290 ELSE IF D=2 THEN 3 
300 ELSE IF D=3 THEN 3310 ELSE IF D=4 TH 
EN_3320 ELSE IF D=5 THEN 3330 ELSE IF D= 
6 THEN 3340 ELSE IF D=7 THEN 3350 ELSE 3 


3290 VXR=1:VYR=1:GOTO 3370 
3300 VXR=1:VYR=O:GOTO 3370 
3310 VXR=1:VYR=-1:GOTO 3370 
3320 VXR=O: VYR=-1:GOTO 3370 
3330 VXR=-1:VYR=-1:GOTO 3370 
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3340 VXR=-1:VYR=O:GOTO 3370 

3330 VXR=-1:UVYR= 1:GOTO 3370 

3360 VXR= ce UYR=1 

3370 RETU 

4000 REM SSPROG MAITRE REJOINT 

4010 IF EARSeRAEN THEN RETURN ELSE IF PYR 
{>PYM THEN RETU 

4020 FOR FOIS=1 Ro 4: SOUND 1,27,5,7:FOR 

AT=1i TO 100:NEXT:NEXT 

4030 FOR AT=1 TO 8SOO:NEXT:RG=RG+1:1F RG< 
5 THEN PEN 3:LOCATE PPXR, PPYR: PRINT CHR$ 
(33): GOTO 180 ELSE 110 


Pas de commentaires techniques. 
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X 


QUELQUES PARTIES DE BRAS DE FER 
EN PERSPECTIVE 


‘Le bug est le propre de l’homme !.”’ 


1. Citation anonyme anticipée à profondeur 2. 
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Il serait possible de continuer et d'imaginer indéfiniment d’autres 
comportements pour la traversée de notre labyrinthe, soit en perfection- 
nant encore ceux qui ont été présentés, soit en imaginant des heuristi- 
ques de nature différente. 

En effet, comme nous l’avons observé en EG, le concept du couple heu- 
ristique navigation-dégagement n’est pas inscrit dans les astres. 

Nous avons ainsi pu établir une heuristique globale permettant d’attein- 
dre le même but, mais nous laissons au lecteur le plaisir de la découvrir 
sur les bases suivantes : 


e Tout contact direct avec un pilier est interdit au robot ; il ne peut donc 
pas essayer une position pour vérifier qu’elle est libre ou occupée par 
un pilier ; il n’a pas le droit de toucher. 


e Il dispose par contre d’un sens de la vue lui permettant d'apprécier 
la direction et la distance de tout pilier visible depuis la case où il se 
trouve. 


e Il peut également, comme dans les exemples précédents, apprécier la 
direction et la distance de son maître. 


Pour en terminer avec les exemples concrets, ce chapitre présente quel- 
ques joutes entre robots. Le lecteur pourra même se mêler à l’une d’elles 
en tant qu'acteur (E32) et insuffler de l'intelligence à son missile lourd 
dans la dernière (E34) pour tenter de vaincre le propre missile de l’auteur, 
spécialement armé d’une heuristique de style guerre des étoiles. 

Ainsi s’achèvera la valse des robots vidéo, qui nous auront permis 
d'aborder dans la bonne humeur plusieurs aspects du monde fascinant 
de l’I.A. 

L'intelligence s’y est trouvé placée dans le mince faisceau de quelques 
projecteurs, mais elle n’a pas perdu pour autant ce qui lui donne tout 
son prix : elle est par nature incapable de se cerner clairement elle-même, 
elle est auto-inaccessible ; vouloir comprendre l'intelligence, c’est l’équi- 
valent physique de prétendre se soulever par les cheveux. 


* 
* * 


Un court bilan de toutes ces pérégrinations ne paraît pas inutile, pourvu 
qu'il reste dans le registre du livre, les pieds sur terre et le nez levé vers 
le ciel. 

On peut louer ou décrier l’Intelligence Artificielle. Mais la somme de 
réflexion qu'il est nécessaire de mettre en œuvre lors de la réalisation de 
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ses programmes constitue, qu’on le veuille ou non, une approche prag- 
matique entièrement nouvelle des comportements humains, même si ces 
derniers sont souvent schématisés et simplifiés. 

Elle ne prétend nullement déboucher sur des pensées philosophiques, 
elle s’y refuse au contraire car cela serait en contradiction essentielle avec… 
sa propre philosophie. 

Mais il faut savoir lucidement reconnaître que cette approche : aura brus- 
quement permis, dans la seconde moitié du XX° siècle, grâce à l’ordina- 
teur simplement considéré comme un manipulateur accéléré de 
connaissances, d’aboutir à une véritable révélation auparavant totalement 
inaccessible : celle de deux modes possibles de fonctionnement de la pen- 
sée vivante. 

Appelons-les, à l’appui des multiples applications déjà réalisées et des 
quelques exemples proposés dans ce livre, le mode algorithmique et le 
mode heuristique. Ils ne sont pas ainsi cités dans l’ordre de leurs valeurs 
supposées, mais dans l’ordre où ils ont émergé dans la conscience humaine, 
c’est-à-dire aussi dans l’ordre inverse de celui où les hommes les ont incons- 
ciemment pratiqués au cours des âges. 

Nous vivons ainsi l'époque privilégiée où un retour aux sources devient 
possible : heuristique inconsciente, algorithmique inconsciente, puis algo- 
rithmique consciente et enfin heuristique consciente, la boucle se ferme. 

Ainsi survolés, les algorithmes peuvent apparaître comme des mani- 
festations intelligentes de l'instinct, et les heuristiques comme des mani- 
festations instinctives de l'intelligence, et les deux n’en font plus qu’un. 

Les heuristiques sont des raisonnements informels, les algorithmes sont 
des pulsions formalisées. Ceux-ci disciplinent les errances, celles-là libè- 
rent les fixations. 

Les plantes et les animaux ne ‘‘pensent”” probablement que par heu- 
ristiques et les algorithmes semblent spécifiquement humains, car nous 
étions seuls capables, parmi les espèces, de nous inventer ces chaînes libé- 
ratrices. En effet, la rigueur artificielle de nos raisonnements constitue 
un véritable dressage de l'imagination et nous permet curieusement d’accé- 
der, au-delà d’eux, à des heuristiques supérieures. 

Les mathématiques et la logique apparaissent à cet égard sous un jour 
nouveau, comme des outils heuristiques puissants, les tremplins indis- 
pensables des envols les plus subtils et les plus riches de la pensée natu- 
elle, et non plus comme d’austères et schématiques instruments incapables 
de nuances. 

L'esprit de géométrie et l’esprit de finesse de Pascal s’y côtoient et s’y 
fondent, liés par une réciproque émulation, et non plus séparés par l’anta- 
gonisme contre nature de l'ère antéinformatienne. 

À propos des KIPS (£row/edge information processing systems) qui 
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seront, Espérons- -le, les merveilleux ordinateurs dits ‘‘de cinquième géné- 
ration” du grandiose projet japonais, citons ce bref passage du livre déjà 
évoqué, La Cinquième Génération : 


‘Supposons que, dès notre première rencontre avec un nouveau sujet, 
on nous présente un nouveau modèle mental bien conçu : une structure 
solide et vaste que nous pouvons facilement saisir pour commencer, et 
à laquelle nous pourrons ajouter des détails qui font toute la différence 
entre la compréhension et l’incompréhension.”” 


Et encore : ‘La connaissance est un objet digne d’être conçu et fabri- 
qué.”” 


Car les littéraires, les scientifiques, les artistes et les autres, qui igno- 
reront la nature et les méthodes de l’I.A. et persisteront à les 1 ignorer, 
se retrouveront assez rapidement naturalisés au fond du poussiéreux musée 
des préinformatiens. 

Ainsi que vient de le dire l’un d’ eux dans un pathétique constat : 
“L'Univers m'est déjà devenu étranger.” 

Mais ne sont-ce pas plutôt eux qui se comportent comme des étran- 
gers à l'Univers d’aujourd’hui ? 

Les nouvelles armées de la connaissance vont poursuivre leurs ravages 
dans les anciennes hordes du faux-semblant ou des suppositions gratuites. 

La connaissance et la pensée préparent l'acte, c’est une projection du 
présent sur l'avenir, une série de tirs à blanc qui précède le coup. 

Il est donc aussi légitime, aussi naturel de construire des machines à 
penser que des machines à agir, déjà entrées depuis des siècles dans nos 
habitudes. Le plus surprenant est qu’on n’y ait pas songé plus tôt puis 
que, sachant maintenant les fabriquer, l’on continue à gloser et à faire 
la fine bouche. 

On ne saurait certes oser comparer un homme à une machine; les 
machines n'auraient jamais pensé à baptiser les hommes d’un nom aussi 
péjoratif et aussi porteur de faux jugements : pensez donc, une machine! 

Pourtant, les machines sont des machines, avec leur diversité morpho- 
logique et fonctionnelle infinie, et les hommes ne sont que des hom- 
mes, avec leur spécificité universellement uniforme. Les seconds 
construisent d’ailleurs les premières pour surmonter leur condition 
et seraient mal avisés de manifester du mépris pour leurs propres 
créatures, car ce mépris vise en fait les créateurs; il est significatif que 
les contempteurs des machines 1 ignorent ce qu elles sont et, inversement, 
que les créateurs de machines n'aient pas ces préventions. 

Le dédain d’un homme pour une machine ne recouvrirait-il pas la ran- 
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cœur banale, par enfant interposé, de quelqu'un qui ignore pour 
quelqu'un qui connaît ? 

Pour les machines à agir, peu rechignent de nos jours car beaucoup 
connaissent, mais pour les machines à penser l’on craint la concurrence 
déloyale de ces mystérieux appareils ou plus précisément de leurs pro- 
priétaires ; pour ceux-là, le terme de machines est trop beau et donne 
place aux trucs ou aux bidules. Mais cela relève probablement de la peur 
confusément ressentie d’une évolution inéluctable qui n’arrange pas tout 
le monde. 

Il y aura demain d’autres philosophes, plus proches de Galilée que 
d’Aristote, préférant le télescope à la boule de cristal, le Monde aux Nuées, 
l'ordinateur au crayon. Au total, comme les aurait aimés Montaigne, des 
hommes à la tête bien faite utilisent la tête bien pleine de petites machi- 
nes en silice, ni plus ni moins fabuleuses que les fabuleux marteaux-pilons 
de Zola. 

Terminons sur une note actuelle en plaçant dans notre ligne de mire 
une catégorie exemplaire de charlatans rapidement fossilisables, mais ne 
sévissant heureusement que dans certains pays exotiques peu développés. 

Quelques hommes politiques, dans leurs prestations publiques, appel- 
lent irrésistiblement une comparaison avec les ordinateurs, engins dont 
ils parlent d’ailleurs volontiers. 

Ils ne décrivent en effet la réalité qu’à coups de bascules électroniques 
à deux positions, de bits isolés : oui ou non, pour ou contre, gauche ou 
droite, gentil ou méchant, généreux ou pingre, pauvre ou riche, travail- 
leur ou profiteur, bien ou mal, nous... ou les autres. 

Il leur manque, pour égaler nos petits ordinateurs personnels, non pas 
hélas! la parole, mais quelque microprocesseur capable de combiner ces 
données et d’échafauder les introuvables heuristiques du bonheur uni- 
versel. 

Les micro-informaticiens à tout crin que nous sommes ne sauraient long- 
temps se laisser prendre à ces sauts de puce, même si les programmes 
qu'ils bâtissent péniblement sont souvent infestés par de redoutables 
cohortes de bugs, réfractaires aux insecticides classiques : grammaire, 
syntaxe, logique, patience, fanatisme. 
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ÉTAPE E30 
COURSE-POURSUITE AU CIRQUE 


Présentation 


Le but du scénario est de proposer une sorte de piste d’essai permet- 
tant de comparer deux à deux des heuristiques. Il s’agit d’une piste car- 
rée autour de laquelle un robot rouge poursuit un robot bleu. 

Dans le cas présent, les deux robots utilisent les mêmes heuristiques : 
2 et F pour le poursuivant, 5 et F pour le fugitif. 

À heuristiques identiques, c’est toujours le poursuivant qui gagne, à 
cause des limitations du terrain interdisant certaines esquives. 

Les poursuites sont agréables à suivre et le lecteur pourra doter les deux 
partenaires de comportements divers. 

Noter que la fonction d'évaluation des distances utilisée ici est diffé- 
rente de celle de E13 afin d’être mieux adaptée à la forme de la piste. 


Programme 


100 ’ETAPE ES3O:PISTE D'ESSAI CARREE DE P 
OURSUITE DE 2 ROBOTS; HEURISTIQUES  IDENTI 
QUES (2)/(F) POUR ROBOT POURSUIVANT ET 
5)/(F) POUR ROBOT POURSUIVI,MODIFICATION 
DE LA FONCTON D’EVALUATION DES DISTANCE 


S 

110 INK O,19:INK 1,14:INK 2,6:INK 3,26:C 

LS:CLEAR 

120 DIM C(40,25)'TABLEAU DES COORDONNEES 
DES CASES DE L'ECRAN SUSCEPTIBLES DE RE 
CEVOIR UN OBSTACLE (PILIER OÙ BORDS DE L 


À PISTE) 
130 SYMBOL AFTER 32:SYMBOL 33,&k0,&7C,&Dé 
LOC, &38,RFE,;&k7C,&6C’ DESSIN ROBOTS 

140 REM NOMBRES ALEATOIRES VARIES 

150 RANDOMIZE TIME 

160 CLS 

170 REM BORD EXTERIEUR PISTE 

180 FOR X=8 TO 32:PEN 1:LOCATE X,3:PRINT 
MSn:LOCATE X,21:PRINT"S":C(X,3)=1:C(X,21 
)=1:NEXT X 

190 FOR Y=4 TO 20:LOCATE 8,Y:PRINT"S":LO 
CATE 32,Y:PRINT"#":C(8,Y)=1:C(32,Y)=1:NE 


XT _Y 
200 REM BORD INTERIEUR PISTE 
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210 FOR X=13 TO 27:LOCATE X,7:PRINT"#$":L 
OCATE X,17:PRINT"#S":C(X,7)=1:C(X,17)=1N 
220 FOR Y=8 TO 16:LOCATE 13,Y:PRINT"#":L 
OCATE, 27,Y:PRINT"#":C(13,Y)=1:C(27,Y)=1: 


NEXT 

230 RÈM PILIERS SUR PISTE 

240 LOCATE 20,4:PRINT"$":LOCATE 20,6:PRI 

NT"#":LOCATE 39° 18: PRINT"#":LOCATE 50 20 
:PRINT'S":LOCATÉ 9,12: PRINT"$":LOCATE 12 
12: PRINT"$":LOCAT 7È 28,12:PRINT"S":LOCAT 

Ë 31,12:PRINT"S&" 


=1:C(20,6)=1:C(20,18)=1:C(20, 
20)=1:C(b,12)=1:C (12, 1221 :C128,12)=1:Ct 
PXRI=INT (21XRND) +10: PYR1=5:PXR2=INT ( 
21XRND)+10:PYR2=19:PEN 1:LOCATE PXR1,PYR 
1:PRINT CHR#(33) : PEN 2:LOCATE PXR2, PŸR2: 


PRINT CHR$(33)’POS ET AFF ROBOTS 

270 REM MISE EN BOUCLE DES 2 ROBOTS 

280 PXA=PXRI1: tes PYR1:PPXA=PXA:PPYA=PYA: 
PXP=PXR2:PYP= AA 

290 SOUND 1,70 TOP DEPART 

1000 REM BOUCLÉ 56,2 MOUVEMENTS 

1010 FOR M=1 TO 300 

1020 TERR#S=INKEYS:1IF TERR#$S<>" " THEN 103 
O ELSE 110 

1030 REM HEUR NAV (2) POUR POURSUIVANT E 
T (5) POUR POURSUIVI 

1040 VXA=SGN(PXP-PXA) : VYA=SGN(PYP-PYA) 
1050 TT=0O’INIT RANG TT DES TENTATIVES 
1060 IF INT(M/2)<>M/2 THEN 1070 ELSE VXA 
=-VXA:VYA=-VYA’CAS DU ROBOT POURSUIVI 
1070 PXA=PPXA+VXA:PYA=PPYA+UYA 

Fee GOSUB 3000°TEST HEURT PIL ET/OU RET 
eee 1F OBS=0 THEN 1100 ELSE 1070'’RECALC 
1100 IF RET=0 THEN 1110 ELSE 1070 

1110 IF°M<>MPI THEN 1250 

1120 REM ESSAI AUTRE SENS D’EXPLORATION 
130 IF ESS=1 THEN 1170 ELSE PX1=PXA:PYI1 
PYA:VXI=VXA: VYI=VYA?MEMO ee POS 

140 SSS=SS:IF SSS=1 THEN SS=0 ELSE SS=1i 
TAVERSTON SENS DE ROTATION 

150 TT=2:ESS=1:D=D1:GOSUB 3250 

160 GOTO 1070'RECALC POS 

170 ESS=0:MPI=0’REINIT ESS ET MPI 

180 REM CHOIX MEILLEURE POS:PLUS COURTE 
DE DOURE POUR POURSUIVANT,PLUS LONGUE P 
1 
2 


DISTI=HOR1+VERTI 
00 HOR2=ABS (PXP-PXA) : VERT2=ABS (PYP-PYA 
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ST2 THEN 1240 ELSE 1250 
STi THEN 1240 ELSE 1250 


ERT2 
2)<>M/2 THEN 1220 ELSE 123 
=D1 

YA=PY1: VXA=VX1: VYA=VYI’1ER 


Mis be be Oe 
NNN fr. 


40 FRAST 


1360 PEN 3:LOCATE PPXA, PPYA: PRINT CHRSCS 
3):1F INT(M/2)CM/2 THEN 1270 ELSE 1260 


1270 SOUNL 1,40,9,/: ren Z:LÜCATE FXA,PFYA 


: PRINT CHRS (83) : GOT! 90 

iz80 SOUND D PEN 1:LOCATE PXA,PYA 
: PRINT CURS 1330 

1280 PEN Te LOCATE 35,2:PRINT M5" " 

1300 608UB 4000! TEST’ ROBOT RETOINT 

1310 REM INVERSION DES ROBOTS 

1320 PXANOUV=P XP: PYANOUV=PYP : PXP=PXA:PYP 
SPYA:PXASPXANOUV: PYA=PVANQUU: PPXAPXA: PP 
YA=PYA : VUXANQUU=UUXP : VUYANOUV=UUYP : VUXP= 
UUXA: VUYPEUUY A: VUXASVUXANOUVU : VUY A= EUYANO 
1330 NEXT M 


END 
2000 REM ZONE DES SOUS-PROGRAMMES 
3000 REM SSPROG HEURT PILIER ET/OU RET A 


RR 
3010 GES=0:RET=0 

3020 REM TEST PILIER 

3030 IF c (PXA PYA)=1 THEN 3040 ELSE 3050 
3040 OBS=1 :GÜTO 3080 

2030 RÉM TEST RET ARR 

3060 IF VXA=-VUXA THEN IF VYA=-VUYA THEN 
3070 ELSE RETURN ELSE RETURN 

3070 IF TT<8 THEN RET=1:GOTO 3080 ELSE R 
3080 TT=TT+1:MPI=M’MEMO NO BOUCLE 

2090 REM ÉSSAL NOUV DIRECTIO 

5100 BEM HEUR DEGMT 1) EXP ORATION ORDO 
NNEE DES DIRECTIONS EN PARTANT DU PILIER 
3110 IF 1121 THEN 3250’CAS 2EME PASSAGE 
ET SUIVANT 

5120 IF VXñ=-1 THEN 3150/CAS 1ER PASSAG, 
DETERM DE LA DIR D1 DU 1ER HEURT 


IF VXA=O THEN 3180 
3140 IF VXA=1 THEN 3200 
3150 IF VYA=-1 THEN D1=5:GOTO 3230 
3160 IF VYA=O THEN Di=é:GOTO 3230 
3170 IF VYA=1 THEN Di=7:GOTO 3230 
3180 IF VYA=-1 THEN Di=4:GOTO 3230 
3190 IF VYA=1i THEN D1=6:GOTO 3230 
3200 IF VYA=-1 THEN Di=3:GOTO 3230 
3210 IF VYA=QO THEN D1=2:GOTO 3230 
3220 IF VYA=1 THEN Di=i 
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Ses D=D1’DIRECTION D DEBUT DE L'EXPLORA 
3240 SS=INT (2XRND) ’TIRAGE SENS EXPLORATI 


3250 REM EXPLORATION POS SUIVTE 

3260 IF SS=0 THEN D=D+1:1F D<9 THEN 3280 
ELSE D=D-8:GO0OT0 3280 | 
3270 D=D-1:1F D>0O THEN 3280 ELSE D=D+8 
3280 1F D=i THEN 3290 ELSE IF D=2 THEN 3 
300 'ELSE IF D=3 THEN 3310 ELSE IF D=4 TH 
EN 3320 ELSE IF D=5 THEN 3330 ELSE IF D= 
6 THEN 3340 ELSE IF .D=7 THEN 33850 ELSE 3 


3290 VXA=1:VYA=1:GOTO 3370 

3300 VXA=1:VYA=0:GOTO 3370 

3310 VXA=1:VYA=-1: GOTO 3370 

3320 VXA=0: VYA=-1: GOTO 3370 

3330 VXA=-1:VYA=-1:GOTO 3370 

3340 VXA=-1:VYA=0O: GOTO 3370 

3350 VXA=-1:VYA=1: GOTO 3370 

3360 VXA=0: VYA=I 

3370 RETURN 

4000 REM SSPROG ROBOT REJOINT 

4010 IF PXA<>PXP THEN RETURN ELSE IF PYA 
<>PYPF THEN RETURN 


4020 SQUND 1, 1000, 20,7: SOUND 1,400 30 
SOUND 1,2000,50,7:FOR AT=1 TO 2000! NEKT 
4030 coté i 1 


Commentaires techniques 


e Il y a une seule boucle des mouvements pour les deux robots, suivant 
la méthode maintenant classique de E16. Mais cela n’est possible que 
si les deux robots utilisent les mêmes heuristiques. 


° La fonction d'évaluation des distances DIST1 et DIST2 s’écrit cette fois : 
DIST = HOR + VERT. 

Ce n’est ni la distance de E13, ni la distance géométrique de Pytha- 

gore. C’est une autre distance heuristique qui évite au robot rouge, 

lorsqu'il est sur le côté opposé de la piste, de s'éloigner du robot bleu 


comme c’est parfois le cas si l’on adopte la fonction de E13. Le lecteur 
pourra chercher pourquoi. 


e Bien entendu, le robot rouge choisit la distance la plus courte et le 
fugitif la distance la plus longue. 


e Il est probable que l'obligation de non-retour en arrière est néfaste 
au robot poursuivi ; par ailleurs, il doit être possible d'améliorer encore 
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la fonction d'évaluation : il n’est pas logique que le fugitif longe le 
bord extérieur de la piste car il maintiendrait mieux son avance en pre- 
nant au plus court, le long du bord intérieur. 


e Ne pas oublier, toutefois, que les heuristiques et la fonction d’évalua- 
tion doivent rester les mêmes pour les deux robots, sinon ce serait trop 
facile. 
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ÉTAPE E31 
UNE PISTE PEU CARROSSABLE 


Présentation 


Les deux robots se poursuivent sur la même piste qu’en E30, mais de 
nouveaux obstacles, tirés au hasard, surgissent constamment sur leur 
chemin. 

L'utilisation des prédicats permet de représenter cet environnement 
variable d’une manière souple et facile. 


Programme 


100 ’ETAPE E31:COMME E30 AVEC MODIFICAT 
ON DE L'ENVIRONNEMENT PENDANT L’EXECUTI 

N DU FROGRAMME: INTRODUCTION D’ OBSTACLES 
SUFPLEMENTAIRES AU COURS DE LA POURSUIT 
110 INK O,15:INK 1,14:INK 2,6:INK 3,26: 

LS:CLEAR 

129 DIM C(40,25)'TABLEAU DES COORDONNEES 
DES CASÉS DE L'ECRAN SUSCEPTIBLES DE RE 
CEVOIR UN OBSTACLE (PILIER OU BORDS DE L 
130 SYMBOL AFTER 22:SYMBOL 33,8&0,&7C, &D6 
WC, &38,RFE,&7C,&k6C’ DESSIN RÜBOTS 

l4o BEM NOMBRES ALEATOIRES VARIES 

150 RANDOMIZE TIME 

160 CLS 

170 REM BORD EXTERIEUR FISTE 

180 FOR X=8 TO 32:PEN 1:LOCATE X,3:PRINT 
MS: LOCATE X,21:PRINT"#"IC(X,3)=1:C(X, 21 
=1INEXT X 

150 FOR Y=4 TO 20:LOCATE 8,Y:PRINT"'#":LO 
CATE 32,Y:PRINT"#":C(8,Y)=1:C(32,Y)=1:NE 


= 
200 REM BORD INTERIEUR PISTE 

510 FOR X=13 TO 27:LOCATE X,7 
OCATE X,17:PRINT"#":C(X,7)=1: 


EXT X 

220 FOR _Y=8 TO 16:LOCATE 1 
OCATE 27,Y:PRINT"'$":C(13,Y 
NEXT _Y 

230 REM PILIERS SUR PISTE 
240 LOCATE 20,4:PRINT"'$":LOCATE 20,6:PRI 
NT"#$°:LOCATE 20,18:PRINT"$":LOCATE 20,20 


I 
(a 
E 
C 
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:PRINT"'S":LOCATE 9,12:PRINT"S":LOCATE 12 
12: PRINTS":LOCATÉ 28, 12: PRINT "#$":LOCAT 

Ë 31,12:PRINT"S" 

250 C(20,4)=1 1C(20,6)=1:C(20,18)=1:C (20, 

20)=1:C (9,12) 21:C(12,12)=1:C(28,12)=1:C{ 

3 = 

266 PXRI=INT (21XRND) +10:PYR1=5:PXR2=INT 

STERND) +10: PYR2219:PEN 1: LOCATÉ PXR1,PYR 
1: PRINT CHR#(233):FEN 2:LOCATE PXR2,PYR2: 

PRINT CHR#(23) POS ET AFF ROBOTS 


270 REN MISE EN BOUCLE DES 2 ROBOTS 

280 PXA=PXR1 : PYA=PYRI1:PPXA=PXA: PPYA=PYA: 
KP=FXR2 : PYPS FYR2 

250 SOUND 1,70,50,7’TOP DEPART 

1000 REM BOUCLE SES MOUVEMENTS 

1010 FOR M=1 T0 300:TERRS=INKEYS:1IF TERR 

=" " THEN 110’CHANGMT DE TERRAIN 

1020 GUSUB 5000 INTRODUCTION D’OBSTACLES 
SUPPLEMENTAIRES 

1030 REM HEUR NAV (2) POUR POURSUIVANT E 

T (5) POUR POURSUIVI 

1040 VXA=SGN(PXP-PXA) : VYA=SGN(PYP-PYA) 

1050 TT=0’INIT RANG TT DES TENTATIVES 

1060 1F INT(M/2)<>M/2 THEN 1070 ELSE VXA 

=-VXA:UYA=-VYA"CAS DU ROBOT POURSUIVI 

1070 PXA=PPXA+UXA:FYA=PPYA+VYA 

1080 GOSUB 3000’ TEST HEURT FIL ET/OU RET 


IST2=HOR2+VERT2 
O0 IF INT(M/2)<2>M/2 THEN 1220 ELSE 123 


O0 IF DISTI<=DIST2 THEN 1240 ELSE 1250 
O IF DIST2<=DISTI THEN 1240 ELSE 1250 
40 PXA=PX1:PYA=PYI:UVXA=UVX1: VYA=VYI’I1ER 
POS CHOISIE 

50 VVXA=VXA:VUYA=VYA’Z2EME POS CHOISIE 


(LA “HOT 


ARR 

nue IF OBS=0 THEN 1100 ELSE 1070’RECALC 
1100 IF RET=0O THEN 1110 ELSE 1070 

1110 IF Ne oMPI THEN _ 1250 

1120 REM ESSAI AUTRE SENS D’EXPLORATION 
1130 IF ESS=1 THEN 1170 ÉLSE PÉG Ge PYi 
=PYA:VXI=VXA: VYI=VYA’MEMO 1ERE 

1140 SSS=SS:IF SSS=1 THEN SS=0 ELSE SS=1 
*INVERSION SENS DE ROTATION 

1150 TT=2:ESS=1:D=D1:GOSUB 3250 

1160 GSOTO 1070 APRÈS POS 

1170 ESS=0:MPI=O0O’REINIT ESS ET MPI 

1180 REM CHOIX METLLEURE POS: PLUS COURTE 
DISTANCE POUR POURSUIVANT, PLUS LONGUE P 
OUR POURSUIVI 

1190 HOR1= Br Eds -PX1):VERTI=ABS (PYP-PY1 
): DISTI=HORI+VERTI 

Fe O0 HOR2= ABS (PXP PXA) : VERT2=ABS (PYP-PYA 
Î 

(e) 

1 

1 

Î 
E 

1 
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1260 PEN 3:LOCATE PPXA,PPYA: PRINT CHRS (3 
3):1F INT (M7 2) € >M/2 THÈN 1270 ELSE 128 
1270 SOUND 1,40,5,7 :PEN 2: LOCATE PXA, BV A 
PRINT CHRS(33) ?GOÜTO 1 

1280 SOUND 1,30,5,7: PEN” L:LOCATE PXA,PYA 
PRINT CHR#$(33) 

290 PEN L'LOCATE 25,2:PRINT Mi 


ST’ ROBOT REJOINT 

310 REM INVERSION DES ROBOTS 

150 PXANOUV=PXP : PYANOUV=PYP: PXP=PXA:PYP 
: PXA=PXANOUV : PYA=PYANOUV: PPXA=PXA:PP 

Tas PYA VUXANOUV=VUXP : VUYANOUV=UVYP: VUXP= 

VUXA: VUYP=UUYA: VUXA=VUXANOUV: VUYA=VUYANO 


UV 

1330 NEXT M 

1340 END 

2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG HEURT PILIER ET/OU RET A 


RR 
3010 GES=0:RET=0 

3020 REM TEST PILIER 

3030 IF SC (PXA PYA)=I OTMEN 3040 ELSE 3050 
3040 O0BS=1 :GOTO 

3050 REH TEST RÈT SSÈR 

5060 IF VXA=-VUXA THEN IF VYA=-UVVYA THEN 
3070 ELSE RETURN ELSE RETURN 

3070 IF TT<8 THEN RET=1:GOTO 3080 ELSE R 
3080 TT=TT+1:MPI=M’MEMO NO BOUCLE 

3090 REM ESSAI NOUV DIRECTION 

3100 REM HEUR DEGMT (F):EXPLORATION ORDO 
NNEE DES DIRECTIONS EN PARTANT DU PILIER 

‘3110 IF TT>1 THEN 3250'CAS 2EME PASSAGE 
ET SUIVANTS 

3120 IF VXA=-1 THEN 3150'CAS LER PASSAG, 


DETERM DE LA DIR Di DU 1ER HEUR 

3130 IF VXA=Q0 THEN ce 

3140 IF VXA=1 THEN 3200 

3150 IF VYA=-1 THEN te S:GOTO 3230 

3160 IF VYA=O THEN Di=6:G0OTO 3230 

3170 IF VYA=i THEN Di=7:GOTO 3230 

3180 IF VYA=-1 THEN D1=4:GOTO 3230 

. IF VYA=i THEN D1=8:GOTO 3230 

3200 IF VYA=-1 THEN D1=3:GOTO 3230 

3210 IF VYA=O THEN D1=2;:GOTO 3230 

3220 IF VYA=1 THEN D1<1 

ST D=D1’DIRECTION D DEBUT DE L'EXPLORA 
Enr SS=INT (2XRND) ’TIRAGE SENS EXPLORATI 


3250 REM EXPLORATION POS SUIVTE 

3260 IF SS=0 RUE 2e de IF D<9 THEN 3280 
ELSE D=D-8:GOTO 

3270 D=D-1:1F 190 THEN 3280 ELSE D=D+8 
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3280 IF D=1 THEN 3290 ELSE IF D=2 THEN 3 
300 ELSE IF D=3 THEN 3310 ELSE IF D=4 TH 
EN 3320 ELSE IF D=5 THEN 3330 ELSE IF D= 
6 THEN 3340 ELSE IF D=7 THEN 3350 ELSE 3 


3290 VXA=1: VYA=1: GOTO 3370 
3300 VXA=1:VYA=0:GOTO 3370 
3310 VXA=1:VYA=-1: GOTO 3370 
3320 VXA=0: VYA=-1: GOTO 3370 
3330 VXA=-1: VYA=-1: GOTO 3370 
3340 VXA=-1: VYA=0: GOTO 3370 
3350 VXA=-1: VYA=1: GOTO 3370 
3360 VXA=0:VYA=I 


RETURN 
4000 REM SSPROG ROBOT REJOINT 

4010 IF PXA<>PXP THEN RETURN ELSE IF PYA 
{)>PYP THEN RÉTURN 

4020 SOUND 1,1000,20,7:SOUND 1,400,30,5: 
SOUND 1,2000,50,7:FOR AT=1 TO ?000!NEXT 
4030 G0TO 1:06 

5000 REM SSPROG INTRODUCTION PROGRESSIVE 
D'OBSTACLES SUPPLEMENTAIRES 

5010 IF M-4XINT(M/4)=0 THEN PXO=INT(15%#R 
ND) +13:PYO=INT (3XRND) +4: C(PXO, PYO)=1:PEN 


1:LOCATE PXO,PYO:PRINT"S$":RE TURN 
5020 IF M-4XINT(M/4)=1 THEN PXO=INT(15%R 
ND) +13: PYO=INT (3XRND) +18: C(PX0,PYO)=1:PE 
N 1:LOCATE PXO, PYO: PRINT" #$": RETURN 
5030 IF M-4XINT(M/4)=2 THEN PXO=INT (4XRN 
D)+9:PYO=INT(11XRND) +7: C(PXO,PYO)=1:PEN 
1: LOCATE EXO, PYO: PRINT"$": RETURN 
5040 PXO=INT (4XRND) +28: PYO=INT(11XRND) +7 
:C(PXO,PYO)=1: PEN 1:LOCATE PX0,PYO: PRINT 


“$" : RETURN 


Commentaires techniques 


° Un obstacle supplémentaire est introduit à chaque boucle nouvelle par 
renvoi à un sous-programme spécial. 


e Les obstacles sont successivement placés dans les parties haute, basse, 
gauche et droite de la piste. 


== 


ÉTAPE E32 
SUS AU MÉCHANT ! 


Présentation 


Il s’agit encore de la piste et des deux robots de E30-E31. 

Mais cette fois, l'opérateur pose lui-même des obstacles supplémen- 
taires pour retarder le moment où le robot rouge rattrapera sa victime. 
Ces obstacles sont mis en place au clavier à l’aide des quatre touches de 
déplacement du curseur, puis validés par appui sur la touche Entrée. 

Le joueur n’a pas le droit d’obstruer totalement la piste, pour laisser 
leur chance aux deux protagonistes. 

Là encore les prédicats permettent une programmation assez facile. 


Programme 


100 ’ETAPE E32:JEU D’ALLIANCE AVEC LE RO 

BOT POURSUIVI DE E30:3MISE EN PLACE D’OBS 

TACLES POUR RETARDER LA PROGRESSION DU R 
OBOT POURSUIVANT *AIDE DES TOUCHES-CU 

RSEUR ET DE LA TAÛCHE ENTER 

110 INK O,19:INK 1,14:INK 2,6:INK 3,26:C 

LS:CLEAR 

120 DIM C(40,25)’TABLEAU DES COORDONNEES 
DES CASES DE L'ECRAN SUSCEPTIBLES DE RE 

CEVOIR UN OBSTACLE (PILIER OÙ BORDS DE L 
130 SYMBOL AFTER 32:SYMBOL 33,&0,&7C,&D6 
LéC,K38,RFE,&7C,kéC’ DESSIN ROBOTS 

190 EM NOMBRES ALEATOIRES VARIES 

150 RANDOMIZE TIME 

160 CLS 

170 REM BORD EXTERIEUR PISTE 

180 FOR X=8 TO 32:PEN 1:LOCATE X,3:PRINT 
"8": LOCATE X,21:PRINT"S"IC(X, 3)=1:C(X,21 
190 FOR Y=4 TO 20:LOCATE 8,Y:PRINT"#":LO 

CATE 32,Y:PRINT"S":C(8,Y)=1:C(32,Y)=1:NE 

200 REM BORD INTERIEUR PISTE 

510 FOR X=13 TO 27:LOCATE X,7:PRINT'#":L 

OCATE x, PS PRINT S'IC(X,7)=1:C(X,17)=1:N 


EXT X 
520 FOR Y=8 TO i16:LOCATE 13,Y:PRINT'#$":L 
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DÉS EUR ANT RUES RES PERLE ONE ERA 

230 REM RRSIERS SUR PISTE 

240 LOCATE 20,4:PRINT"#":LOCATE 20,6:PRI 

NT"H":LOCATE 36: 18: PRINT"$":LOCATE 56. 20 
: PRINT" S":LOCATÉ 9,12:PRINT"#":LOCATE 12 
12: PRINT IS": LOCATÉ 28,12:PRINT'"$":LOCAT 


Ë 31,12:PRINT"S$" 

250 É(20,4)=1:C(20,6)=1:C(20,18)=1:C(20, 
20)=1:C(9,12)=1:C (12,12)=15 :C(28,12)=1:Ct 
3 = 

260 PXRI=INT (21XRND) +10: PYR1=5:PXR2=INT( 
21XRND)+10:PYR2=19:PEN 1:LOCATE PXR1,PYR 
1:PRINT CHR$(33):PEN 2:LOCATE PXR2,PYŸR2: 
PRINT CHR$(33)’P0S ET AFF ROBOTS 


270 REM MISE EN BOUCLE DES ? ROBOTS 
280 PXA=PXR1:PYA=PYRI:PPXA=PXA: PPYA=PYA: 
PXP=PXR2:PYP=PYR2 

290 SOUND 1,70, 50,7: Top DEPART 

300 REM FOS'ET AFÉ JOUEUR 

310 PXJ=21:PYJ=6: PEN 3 LOCATE PXJ,PYJ:FR 
INT": PPXJI=PXJ: PPYJ=PY 

1000 RÈM BOUCLE DES MOUVEMENTS 

1010 FÜR M=1 TO 500 

1020 TERR$S=INKEYS:IF TERR$=" " THEN 110 
1030 REN HEUR HAŸ: (2) POUR POURSUIVANT E 
T (5) POUR POURSUIVI 

1040 VXA=SGN(PXP-PXA) : VYA=SGN(PYP-PYA) 
1050 TT=0’INIT RANG TT DES TENTATIVES 
1060 IF INT(M/2)<>M/2 THEN 1070 ELSE VXA 
£-VXA:VYA=-VYA’CAS DU ROBOT POURSUIVI 
1070 PXA=PPXA+VXA: PYA=PPYA+UYA 

1080 GOSUB 3000 TEST HEURT PIL ET/OU RET 


R 
1090 IF OBS=0 THEN 1100 ELSE 1070’RECALC 


00 IF RET=0 THEN 1110 ELSE 1070 

10 IF M<>MPI THEN 1250 

20 REM ESSAI AUTRE SENS D’EXPLORATION 
30 IF ESS=1 THEN 1170 ELSE PE PXA:PY1 
YA: VXI=VXA.VYI= MEMO 1ERE POS 

40 SSS=SS:1F SSS=1 THEN ta (e) ELSE SS=1 
NVERSION ser DE ROTATIO 

90 TT=2:ESS=1:D=D1: GOSUS 3250 

60 GOTO 1070’ "RÉCALÉ POS 

70 ESS=0:MPI=O0O’REINIT ESS ET MPI 

80 REM CHOIX ME DLLEURE POS: PLUS COURTE 
2 DO AT POURSUIVANT, PLUS LONGUE P 
90 HORI=ABS (PXP-PX1):VERTI=ABS(PYP-PYI 
DISTI=HORI+VERTI1 : 

00 HOR2=ABS (PXP-PXA) : VERT2=ABS (PYP-PYA 
DIST2=HOR2+VERT2 

10 IF INT(M/2)<>3M/2 THEN 1220 ELSE 123 


mme) bekshehe she || bebehete 
NesNee me Ci he be het bei bee TJ ee be bee pt TT] 
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{=DIST2 THEN 1240 ELSE 1250 

<=DIST1 THEN 1240 ELSE 1250 

= YA=PY1: VXA=VX1: VYA=VYI'1ER 
POS CHOISIE 


250 VUXA=UXA: UUYA=VYA?2EME POS CHOISIE 
260 PEN 3:LOCATE PPXA,PPYA: PRINT CHRS#(3 
)°:1F MAS THÉN 1270 ELSE 1280 
270 SOUND 40,5, 7:PEN 2:LOCATE PXA,PYA 
: PRINT CbRS (43) : 8670 12970 

280 SOUND 30,5,/7:PEN 1:LOCATE PXA,PYA 
: PRINT CHES | 3) 

1290 PEN 1:LOCATE sZ2:PRINT ‘ 

1300 GOSUB 4000”? TEST” ROBOT REJOINT 

1310 REM INVERSION DES ROBOTS 

1320 PXANOUV=PXP: PYANOUV=PYP: PXP=PXA:PYP 
=PYA:PXA=PXANOUV : FYA=PYANOUV:PPXA=PXA:PP 
YA=PYA:VUXANOUV=UUVXP : VUYANOUV=EUUYP:VUXP= 
VUXA’ VUYP=UUYA:UVUXA=VUXANOUV : VUYA=VUYANO 


1330 REM COMMANDE DEPLACEMENT JOUEUR ET 
INTROD OBSTACLES 

1340 GOSUB 5000 

1350 FOR AT=1 TO 100:NEXT:NEXT M 

1360 GOTO 100'RENVOI À NOUVELLE PARTIE 
2000 REM ZONE DES SOUS-PROGRAMMES 

3000 REM SSPROG HEURT PILIER ET/OU RET A 


3010 OBS=0:RET=0 
3020 REM TEST PILIER 

3030 IF C(PXA,FYA)=1 THEN 3040 ELSE 3050 
3040 O0BS=1 :GO0TO 3080 

3050 REM TEST RET SRÈR 

3060 IF VXA=-VUXA THEN IF UYA= -UVYA THEN 
3070 ELSE RETURN ELSE RETUR 

3070, IF TT<& THEN RET=1: 6070 3080 ELSE R 


3080 TT=TT+1:MPI=M'MEMO NO BOUCLE 

3090 REM ESSAI NOUV DIRECTION 

3100 REM HEUR DEGMT (F):EXPLORATION ORDO 
NNEE DES DIRECTIONS EN PARTANT DU PILIER 
3110 IF TT)>1 THEN 3250'CAS ZEME PASSAGE 
ET SUIVANTS 


220 IF DIST 


N 
(A) 
[e) 
Len | 
ui 
[e] 
Tr 
X UN 
Ce 
.. Nr 


srl reteflhehe ke © 
N 
BS 
© 
TT 
X 
D 


3120 IF VXA=-1 THEN 31S0'CAS 1ER PFASSAG, 
DETERM DE LA DIR Di DU 1ER HEURT 
3130 IF VXA=O THEN 3180 

3140 IF VXA=1 THEN 3200 

3150 IF VYA=-1 THEN D1i=5:GO0TO 3230 
3160 IF VYA=O THEN D1=6:GOTO 3230 
3170 IF VYA=1 THEN Di=7:GOTO 3230 
3180 IF VYA=-1 THEN Di=4:GO0OTO 3230 
3190 IF VYA=1 THEN Di=8:GO0OT0 3230 
3200 IF VYA=-1 THEN D1=3:GO0OTO 3230 
3210 IF VYA=O THEN Di=2:GOT0 3230 
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3220 IF VYA=1 THEN Di=i 
3230 D=DI’DIRECTION D DEBUT DE L'’EXPLORA 


3240 SS=INT (2XRND) ’ TIRAGE SENS EXPLORATI 


3250 REM ERRÉSRANISE POS SUIVTE 

3260 IF SS=0 THEN D=D+1:1F D<9 THEN 3280 
ELSE D=D-8:GOTO 3280 

3270 D=D-1:1F D>0 THEN 3280 ELSE D=D+8 
3280 IF D=1 THEN 3290 ELSE IF D=2 LR 


Sa 3340 ELSE IF D=7 THEN 3350 ELSE 3 


2290 VXA=1:VYA=1:GOTO 3370 
3300 VXA=1:VYA=0:GOTO 3370 

3310 VXA=1:UYA=-1:GOTO 3370 

3320 VXA=0:VYA=-1:GOTO 3370 

3330 VXA=-1:VYA=-i:GOTO 3370 

3340 VXA=-1:VYA=0:GOTO 3370 

3350 VXA=-1:VYA=1:GOTO 3370 

3360 VXA=0:UVYA=I 

3370 RETURN 

4000 REM SSPROG ROBOT REJOINT 

4010 IF PXA(>PXP THEN RETURN ELSE IF PYA 
>PYP THEN RÉTURN 

4020 SOUND 110004 20,7: SOUND 1,400,30,5: 
SOUND 2000! 50,7:FOR AT=1 TO 2000:NEXT 


0 11 

4040 REM SSPROG INTRODUCTION PROGRESSIVE 
D'OBSTACLES SUPPLEMENTAIRES 
4050 IF M-4YINT(M/4)=0 THEN PXO=INT(15XR 
AA PYO=INT(S3XRND) +4: C(PX0O,PYO) =1: PEN 

:LOCATE PXO,PYO:PRINT"$":RE TURN 
41080 IF M-4XINT(M/4)=1 THEN PXO= INT L15XR 
ND) 913; PYO= INT(3XRND) +18: C(PXO,PYO)=I1:PE 
N 1:LOCATE PXO,PYO:PRINT"#": RETURN 
4070 IF M-4XINTIM/4)=2 THEN PXO=INT (4XRN 
D) +9: PYO=INT(11XRND) +7: C(PX0 EN EN 
1:LOCATE PXO,PYO: : PRINT" $": RETUR 
4080 PXx0= INT (4XRND) +28: PYO= ENT] LXRND) +7 
an LE EN : PEN 1:LOCATE PXO,PYO: PRINT. 
9000 REM SSFROG AÉÉS SC MENT JOUEUR: ET IN 
TRODUCTION OBSTACLES 
35010 Sas INKE VS: IF JH=CHR#S(242) THEN VXJ= 
-1:VYJ=0: GOTO 5060 
hi IF J$=CHR$S(243) THEN VXJ=1: VYJ=0: 60 
S0a8 Te JH=CHR$S (241) THEN VXJ=O: VYJ=1:6G0 


60 
9040 IF J$=CHR$S(240) THEN VXJ=O0:VYJ=-1:6 


OTO 5060 
5050 VXJ=0:VYJ=0: GOTO 5070’CAS OÙ AUCUNE 
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TOUCHE APPUYEE 

5060 SOUND 1,100,10,7 . 

5070 PXJI=PXI+VXI PYI=PYJ4VYJ 

5080 REM EFFETS DE BORDS 

5090 IF PXJ)8 THEN 5100 ELSE PXJ=9:GOTO 


5130 

5100 IF PXI<32 THEN 5110 ELSE PXJ=31 
5110 1F PYJ>3 THEN 5120 ELSE PYJ=4:GOTO 
5120 IF PYJ<21 THEN 5130 ELSE PYJ=20 
5130 IF C(PPXJ,PPYJ)=1 THEN PEN 1:LOCATE 
LPPXI, PRYJIPRINT'S* ELSE LOCATE PPXJ,PPY 
5140 IF C(PXJ,PYJ)=1 THEN PEN 1:LOCATE P 
XI,PYJI:PRINT"$" ELSE PEN 3:LOCATE PXJ,PY 
J:PRINT"“" 

5150 PPXJI=PXIJ:PPYJ=PYJ 

5160 IF JBC>CHR$S(224) THEN RETURN ELSE S 
OUND 1,20,5,7:PEN 1:LOCATE PXJ,PYJ:PRINT 
Mgr: C(PXJ, PYJ)=1: RETURN 


Commentaires techniques 


e La commande de déplacement du joueur, symbolisée sur l'écran par 
la flèche verticale de code 94, est programmée vers la fin de la boucle 
des mouvements par renvoi à un sous-programme spécial. 


e Ce sous-programme surveille le clavier par une instruction INKEY$, 
réponse Af. 
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ÉTAPE E33 
BANC D'ESSAI POUR HEURISTIQUES CONCURRENTES 


Présentation 


Nous avons vu en E4 que certaines heuristiques, tout en conduisant 
à des nombres de pas identiques pour un parcours donné, doivent être 
cependant considérées comme supérieures à d’autres, car leur cadence 
de réflexion, donc d’exécution, est plus rapide. 

C'est le cas de l’heuristique de navigation 2 par rapport à l’heuristi- 
que 1 : 2 est plus simple et plus rapidement calculée, sa boucle est par- 
courue plus vite, la cadence des pas est plus élevée. 

Le programme E4 permet de distinguer nettement la différence. Celui 
de la présente étape est plus parlant, car on y voit deux robots, dotés 
chacun de l’une des deux heuristiques (robot rouge : 1; robot bleu : 2) 
avancer ensemble vers le but. 

Le programme propose pour un trajet donné, soit de comparer les nom- 
bres de pas (option P), soit de comparer les temps de parcours (option T). 

Chaque robot possède sa propre boucle des mouvements. 

Dans l'option P, les robots font un pas chacun à leur tour. Les deux 
boucles sont parcourues successivement, en série. De ce fait, bien que 
la boucle 2 soit parcourue plus rapidement que la boucle 1, la cadence 
générale est forcément la même et seul le nombre de pas fait la diffé- 
rence entre les deux heuristiques. 

En l'occurrence, les deux robots arrivent ensemble au but. 

Par contre, dans l’option T, chaque robot effectue à son tour une ope- 
ration mentale élémentaire, c’est-à-dire parcourt un morceau de sa bou- 
cle, et c’est ensuite le tour de l’autre robot. 

Les deux boucles ont été ainsi découpées en tranches dont les temps 
d'exécution sont estimés sensiblement égaux, la boucle 1 comportant donc 
un nombre de tranches plus élevé que la boucle 2. 

Le programme parcourt alternativement une tranche de chaque bou- 
cle, en parallèle, et restitue donc à l’écran l'échelle des temps réels d’exé- 
cution. 

Quel que soit le parcours, le robot bleu 2 arrive le premier : l’heuris- 
tique 2 est supérieure à l’heuristique 1. 
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Programme 


100 ’ETAPFE E33:STRUCTURE-TYPE D'UN PROGR 
AMME DE COMPARAISON DES "INTELLIGENCES" 
DE 2? HEURIST VIS À VIS D’UNE EPFREUVE (SI 
TUATION ET OBJECTIF) DONNEE 
110 DEF EPREUVE:-SITUATION:2 ROBOTS,POS 
TIREE AU HASARD -OBJECTIF:REJ MAITRE, PO 
GS ÉGALMT TIREE AU HASARD, DANS LE TEMPS M 
INIMUM (OPTION T) OÙ AVEË LE NOMBRE MINI 
MUM DE PAS (OPTION P);POSSIE CHANGER D’0O 
PTION FAR TOUCHE D’ESPACEMENT 
120 INK O0,22:INK 1,1:INK 2,6:CLS:CLEAR 
130 SYMBOL AFTER 32:SYMEOL 33,8&0,8&7C,&Dé 
LéC,R38,RFE, &7C, kéC 
140 PEN 1:LOËATE’ 4,10:PRINT"TEMPS MINI O 
Ü PAS MINI (T OU P}j?" 
150 RANDOMIZE TIME:OP#=INKEYS:IF OP#S<>"T 
"AND OP#<)"P" THEN SOUND 1,25,5,7:FOR A 
T=1 TO 100:NEXT:GOTO 150 
160 CLS:PXR1=39:PYRI=INT (21#RND) +2: PXR2= 
PXR1:PYR2=PYR1’ POSITION DEPART ROBOTS 
170 FXM=1:PYM=INT(21XRND)+2:PEN 1: LOCAT 
E PXM,PYM:PRINT CHR$ (248) 
180 FÜR FOIS=1 TO 10:PEN 1:LOCATE PXR1,P 
YRL: PRINT CHR$ (33): SOUND 1,30,2,7:PEN ?: 
LOCATE PXR2,PYR2:PRINT CHRÉ(33)!FOR AT=i 
TO SO:NEXT:NEXT 


190 SOUND 1,100,40,7:N=1 
1000 REM BOUCLE’ 1:MOUVEMENTS ROBOT NO 1, 
HEURIST NAV (1) 


1010 FOR AT=i TO SO:NEXT:IF PXM-PXRI=0 T 
HEN VXRI=0:VYRI=SGN(PYM-PYR1):GOTO 1040 
ELSE NUME=ABS (PYM-PYR1) : DENO=ABS (PXM-PXR 
1): IN=NUME / DENO 
1020 GOSUE 5000 
1030 IF IN<O.5 THEN VXRI=SGN(PXM-PXR1 ) : 
YR1=0 ELSE IF IN)2 THEN VXRI=0:VYRI=SGN 
PYM-PYRI) ELSE VXRI=SGN(PXM-PXR1) : VYRI= 
GN(PYM-PYR1) 
1040 GOSUE 5000 
1050 PXR1=PXR1+VXR1:PYRI=PYRI+UYRI 

:GOSUB 5000 
1060 PEN 1:LOCATE PXR1,PYRI:PRINT CHRS&(3 
3): SOUND 1,80,5,7 

:GOSUB 5000 

1070 IF OP#="T" THEN 1000 ELSE 2000 
2000 REM BOUCLE 2:MOUVEMENTS ROBOT NO 2, 
HEURIST NAV (2) 
2010 FOR AT=1 TO SO:NEXT:N=2:VXR2=SGN(PX 
M-PXR2) : VYR2=SGN(FYM-PYR2) 


:I1F OP$S="T" THE 
N RETURN ELSE 2020 
2020 N=3:PXR2=PXR2+VXR2: PYR2=PYR2+UYR2 


V 
{ 
S 
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IF OP+="T" THEN RETURN ELSE 2030 
=4:PEN 2:LOCATE PXR2,PYR2:PRINT CH 
: SOUND 1,70,5,7 

IF OP$="f" THÉN RETURN ELSE 2040 
0 


2040 GOSUB 4000? TEST MAITRE REJOINT 

2050 IF OP$="T" THEN 2000 ELSE 1000 

2060 END 

3000 REM ZONE DES SOUS-PROGRAMMES 

4000 REM SSPROG MAITRE REJOINT 

4010 IF PXRI=PXM AND PYRI=PYM THEN 4020 

ELSE IF PXR2=PXM AND PYR2=PYM THEN 4020 

ELSE RETURN 

4020 SOUND 1,40,50,7:FOR AT=1 TO 2O000:NE 
XT: TERRS= INKÈVSE IF TERR$=" " THEN 120 EL 


E 
ONU D ere 1: MOUVMTS ROBOT NO 1,HEU 
9000 REM SSPROG TRANSFERT OPTIONNEL DE B 
OUCLE 1 À BOUCLE 2 

9010 IF OP#="T" THEN ON N GOSUB 2010,202 
0,2030,2040:RETURN ELSE RETURN 


2030 N 
R$ (33) 


Commentaires techniques 


L'option T ou P est introduite au clavier à l’aide d’une instruction 
INKEYÉ en tête de programme : réponse par variable OP$ (option). 


Les positions de départ et d’arrivée, tirées au hasard, sont bien entendu 
identiques pour les deux robots. 


Le programme comporte deux boucles, l’une pour le robot rouge, l’autre 
pour le bleu. 


Chacune est découpée en tranches repérables, dans la boucle 1 par le 
renvoi GOSUB 5000, et dans la boucle 2 par le renvoi IF OP$ = T 
THEN RETURN. 


Le sous-programme 5000 aiguille, dans l'option T, de la boucle 1 à 
la boucle 2 par le jeu du paramètre N et de l'instruction ON N GOSUB. 


Les boucles 1 et 2 ne sont pas du type FOR NEXT, pour éviter les dif- 
ficultés des sorties et des rentrées successives dans ce genre de boucle. 
On sait en effet qu’on ne peut rentrer dans une boucle FOR NEXT 


‘que si l’on en est sorti par un GOSUB : c’est le cas pour la boucle 1, 


mais la boucle 2 ne comprend que des RETURN. 


Il est facile de suivre le programme à la trace à travers les deux boucles 
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et de constater les différences de modes : dans l’option P les boucles 
sont parcourues en entier et successivement ; danx l’option Tilyaun 
va-et-vient permanent entre les deux boucles, tranche après tranche. 


e N'importe quelle heuristique peut être traitée par ce procédé, le nombre 
de tranches élémentaires, dont chacune correspond à un temps ‘‘men- 
tal’’ pris comme unité?, étant différent suivant les heuristiques 
concernées. 


2. Chaque tranche devrait, en toute rigueur, comporter le même nombre d'inférences logiques, 
ces opérations qui servent à définir la vitesse d'exécution, en ‘‘lips””, des ordinateurs. 
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ÉTAPE E34 
QUI DIT MIEUX ? 


Présentation 


Le programme du présent scénario présente deux missiles autoguidés 
en compétition, comme en E27. Mais ces missiles sont lourds et possè- 
dent donc, comme dans la réalité, une certaine inertie, contrairement 
à ceux de E27 qui prenaient instantanément la direction assginée par cha- 
cune de leurs deux heuristiques. 

Rappelons que le robot ordinaire fonctionnait avec l’heuristique 2 et 
le robot superintelligent avec l’heuristique 6 à anticipation. 

Cette fois, c’est la force de propulsion des missiles (c’est-à-dire leur 
accélération) et non plus directement leur vitesse qui est définie par l’heu- 
ristique 2 ou 6. 

Les trajectoires sont différentes de celles de E27 car il faut aux missiles 
du temps et de l’espace pour incurver leur route vers la cible en mou- 
vement. 

La formule d’anticipation optimale est difficile à imaginer. 

Le programme présenté a adopté la même que celle de E27 mais il 
doit être pc'sible de faire mieux : telle est l'invitation faite au lecteur. 

Comme en E27, seules les deux lignes donnant les composantes AXMIO 
et AY MIO peuvent être changées, pour assurer la loyauté de la compéti- 
tion ; les missiles ne doivent pas franchir plus d’une case par pas. 

Des effets de bords sont par ailleurs à prévoir pour les deux missiles. 


Programme 


100 ’ETAFE E34:COMME E27 AVEC MISSILES " 

LOURDS" DOTES D’INERTIE,HEURISTIQUES D’A 

CCELERATION (6) ET (2) 

110 INK O,22:INK 1,1:INK 2,6:INK 3,23:CL 

5: CLÉAR:SËCG=0:SCA=0’ INIT SÈORE 

120 SYMBOL AFTER 32:SYMBOL 33,&kFO0,&EO, &F 

0,KB8,&1C,&F,&6, 4 

130 CLS:R2O:PEN 1:LOCATE 4,11:PRINT'"VITE 

SSE DE LA CIBLE (DE 0,5 À >?) ?":LOCATE ? 
13:PRINT"PUIS APFUYEZ SUR LA BARRE D’ES 

PACEMENT" 

140 D$S=INKEYS:RANDOMIZE TIME:IF D$=" " T. 
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HEN 150 ELSE IF Ds". OR D$)"9" THEN SO 

UND 1,%0,5,7:FOR AT=i TO 200:NÉXT:GOTO 1 

40 ELSE R=R+1: ER CR) =D: PEN 1: LOCATE 17+R 
15:FRINT AS (R) : SOUND 1,20,10,7:GO0OT0 140 
150, K$=" ":FOR Z=1 TO R'K$= RSTASILICNEXT 

: K=VAL (K$) :ON ERROR GOTO 130 

160 PEN 1:LOCATE 16,16: PRINT"VIT="5K 

170 IF K(O.5 OR K>2' THEN SOUND 1,500,30, 

7:FOR AT=1 TO 1000:NEXT:GOTO 130 

180 FOR AT=i TO 1000: NEXT:CLS:H= INT (2ÉRN 

D):IF H=1 THEN PXC=INT(10XRND+8) :PYC=6 E 

LSÉ PXC=8:PYC=INT (10XRND+8) ’ TIRAGE 0817 


E 
190 PPXC=PXC:PPYC=PYC 
200 DDC NTSENRND) 7 PTE ATAOÆRNDEAS 
: PPXMI=PXMI : PPYMI=PYMI’ POSITION DEPART M 
IS SILE ET MISE EN RESERVE POUR EFFACEMEN 


: 

210 FXMIO=PXMI:PYMIO=PYMI:PPXMIO=PXMIO:F 

PYMIO=PYMIO’ POSITION DEPART MISSILE ORDI 

NATRE IDENTIQUE À CELLE DU PREMIER 

22 LOCATE PXC,PYC:PRINT"O":PEN 1: 

ÉÉCATE NS PYMI:PRINT CHR$(33) :LOCATE 3 
:PRINT'ORD="; SCO; " 

MR TANT SCA" AFF CIBLE,MISSILES ET SC 

230 VXC=KXSGN (2XRND- 1) : VYC=KXSGN (2XRND-1 

)’TIRAGE COMPOSANTES VITESE CIBLE 

240 SOUND 1,200,80,7:FOR AT=1 TO 2000:NE 

XT’TOP DEPART 

1000 REM EOUCLE DES MOUVEMENTS 

1010 FOR M= 1 TO 500 

1020 REM CHANGEMENT DE VITESE CIBLE 

1080 CHS=INKEYS: IF CH$S<>" " THEN 1040 EL 

1040 REM MOUVMT CIBLE 

1050 PXC=PXC+UXC: PYC=PYC+UVYC’ CALC NOUVEL 

LE POS CIBLE 

1060 GOSUB 3000’ EFFETS DE BORDS 

1070 PEN 2:IF CINT(IPXC)<>40 OR CINT(PYC) 

4325 THEN LOCATE PPXC,PPYC:PRINT " ":LOC 

AÂTE PXC,PYC:PRINT"o":SQOUND 1,100,5,7:PPX 

C=PXC:PPYC=PYC ELSE SOUND 1,53, 167 D: PXC= 

39:VXC=-ABS (VXC) : VYC=- ABS (UY ET ? 0TO 1070 

AFF CIBLE (SAUF POS 40,25 INTERDITE) ET 

MISE EN RES 

1080 GOSUB 5000’CIBLE ATTEINTE 

1090 REM MOUVMT MISSILE ORDINAIRE, ACCELE 

RATION SUIVANT HEUR (2) 

1100 AXMIO=SGN (CINT (PXC) -PXMIO) : VYMIO=SG 

N(CINT(PYC)-PYMIO) 

1110 VXMIO=SGN(VXMIO+AXMIO) 

1120 VYMIO=SGN (VYMIO+AXMIO) 

1130 PXMIO=PXMIO+VXMIO: PYMIO=PYMIO+VYMIO 
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IF PPXMIO<>PPXMI THEN 1150 ÉRSE IF 
IO<>PPYMI THEN 1150 ELSE PEN 1:LOCA 
PXMIO,PPYMIO:PRINT CHRE 133) : GOTO 1ié 


O LOCATE PPXMIO,PPYMIO:PRINT" " 
O PEN 3: SO PXMIO, PYMIO: PRINT CHR#& 
io 1,30,5,7: PPXMIO=PXMIO: PPYMIO= 


ps) 

6 

: 

70 REM MOUVMT ue A ANTICIPATION,A 
ELERATION SUIVANT HEURIST (6) 

Fo. AXMI=SGN(CINT(PXC)-PXMI+VXCXABS (ABS 
I 

9 

I 

0 

1 

2 


<p 
DZO 


1))’ADJONCTION D’UN TER 
L'HEURIST (2) POUR T 
ESSE DE LA CIBLE 


O VXMI=SGN(VXMI+A 
O VYMI= =SCNVYN +A 


R 
240 LOCATE PRNME MI:PRINT" ":PEN 1:L 
Dee PXMI.PYMI: SPRINT CHRS (39) : SOUND 1 3 
ZE PPXMT= PXMI:PPYMI=PYMI'AFF ET MISE 


1250 FG0SUR 9000’TEST CIBLE ATTEINTE 
1260 FOR AT=1 TO SO:NEXT:NEXT M 
1270 END 


2000 REM ZONE DES SOUS-PROGRAMMES 
3000 REM SSPROG EFFETS DE BORDS CIBLE 


10 _IF CINT{PXC) 0 THEN 3020 ELSE SOUN 
D 1 10,7:PXC=1:VXC=-UXC 
3020 IF CENT BNC) à 41 THEN 2030 ELSE SOU 
ND 1,53,10,7:PXC=40:UXC=-UXC 
3030 IF CINT(PYC)>0 THEN 3040 ELSE SOUND 
1,52,10,7:PYC=1:VYC=-VYC:RETU 
3040 ÎF CINT(PYC)<26 THEN RETURN ELSE SO 
UND 1,53,10,7:PYC=25:VYC=-VYC: RETURN 
4000 REM SSPROG EFFETS DE BORDS MISSILE 
À ANTICIPATION 
4010 IF XMI>0 THEN 4020 ELSE PXMI=1:GOT 
4020 IF PXMI<41 THEN 4030 ELSE FXxMI=40 
4030 IF PYMI)O THEN 4040 ELSE PYMI=1:RET 


URN 
4040 IF PYMI<26 THEN RETURN ELSE PYMI=25 


: RETURN 

5000 REM SSPROG CIBLE ATTEINTE 

5010 IF PXMIO<)CINT(PXC) THEN 5020 ELSE 
IF PYMIO)CINT(IFYC) THEN 5020 ELSE PEN 
2:LOCATE PXMIO,PYMIO:PRINT CHR$ (33) : SCO= 
SCO+1:GO0OT0 5030 
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9020 IF PXMI 


{>CINT(PXC) THEN RETURN ELSE 
IF PYMI<SDCINTI(P 
1,P 
1 


IN 
YC) THEN RETURN ELSE PEN 
A UOATE FXxM YMI:PRINT CHR$(33):SCA=SC 


+1 
5030 FOR FOIS=1 TO 4:SOUND : FOR 
AT=1 TO 1001 NEXT: NEXT : FOR AT2 17+à 800: NE 
XT:GOTO 180 


Commentaires techniques 


e Avec des missiles lourds il faut prévoir des sous-programmes d’effets 


de bords, même pour le missile ordinaire, car leur inertie peut les 
conduire au-delà des limites d’écran. Cela n’a pas été nécessaire dans 
le programme proposé car les accélérations sont importantes. 


Suivant la masse et la force propulsive des missiles, les composantes 
AXMI, AYMI, AXMIO et AY MIO peuvent être modifiées en plaçant 
un coefficient en tête des quatre formules qui donnent ces composan- 
tes. Mais le coefficient doit être le même pour les quatre. Cette règle 
est également valable pour les nouvelles heuristiques que pourrait trou- 
ver le lecteur. 
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ÉTAPE E35 
UNE QUESTION FINALE INSIDIEUSE 


Ceci n’est pas un scénario, et n’a pas de programme ni de commen- 
taires techniques. Car ce n’est même pas une étape, c’est simplement 
l’arrivée et la fin du voyage. 

Et c’est aussi le moment d’essayer de répondre à l’une des questions 
les plus mystérieuses, en permanence sous-jacente dans les 34 programmes 
du livre. 

Nous pouvons observer, au terme des exploits de nos petites créatu- 
res, que tous les critères énumérés au Chapitre Il, sauf deux, ont été pro- 
gressivement intégrés, à des degrés divers, dans les programmes présentés. 

Parlons d’abord du premier, repéré », et gardons le second, objet de 
la question mystérieuse, pour la fin. 

Le critère # n’a pas été complètement mis en œuvre, et pour cause. 

Le langage BASIC possède certes ses qualités spécifiques : accessibi- 
lité, interactivité, qui constituent deux atouts d'initiation considérables, 
dont on ne prend vraiment conscience qu’en abordant d’autres langages 
plus professionnels 

Mais il est insuffisamment structuré, non récursif, ligoté dans le che- 
minement linéaire de ses instructions numérotées. Il ne permet pas d’obte- 
nir le découplage des données et des règles de ses programmes, par 
opposition à la souplesse de la programmation déclarative. 

Mais il est remarquable qu'un tel langage d'initiation, inventé voici 
maintenant de nombreuses années, puisse donner accès à tant de concepts 
de l’Intelligence Artificielle, grâce à quelques outils puissants dont ses 
créateurs l’ont doté dès le départ. 

Passons maintenant au critère repéré c de la liste du Chapitre Il : 7 
y a un but final précis. C’est anodin, parce que c’est évident, tout pro- 
gramme doit avoir un but, avec ou sans IA. 

Mais il est moins facile de répondre de façon précise à la question sui- 
vante... à moins de ne pas se la poser : à quel endroit du programme 
le but est-il concrétisé, représenté, signifié à l'ordinateur ? 

Si l’on examine les 34 programmes, on peut d’abord affirmer que le 
but (rejoindre le maître ou l’autre robot) ne figure nulle part, si ce n’est 
dans le sous-programme ‘‘maître rejoint’” ou ‘‘rencontre des deux robots” 
Encore ne s'agit-il pas de l'indication du but, ni encore moins de directi- 


3. Cf. P. Lebeux, Introduction à Ada, Éditions Sybex. 
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ves pour l’atteindre, mais simplement d’un constat : le but est ou n’est 
pas atteint et, dans le premier cas, le parcours est interrompu. 

Considérons alors les plus frustres de nos programmes, El et E2; ils 
atteignent leur but une fois sur trois, à l’aide de simples rebonds aléatoi- 
res qui sont donc, dans ce cas, les seuls artisans de la victoire. Ce sont 
les instructions correspondantes qui recèlent donc le fameux but. 

En Ed, c’est clairement l’heuristique de navigation qui joue le même 
rôle décisif et unique, tout comme en E3 où le cap de lancement en tenait 
lieu. 

Il en est de même en Es. 

À partir de EG, étape où les obstacles apparaissent, l’heuristique de 
dégagement se conjugue avec la précédente pour assigner le but. Rétros- 
pectivement, on peut d’ailleurs considérer les rebonds de El et E2 comme 
des heuristiques de dégagement dans leur version la plus sommaire. 

Ainsi, dans tous les cas, la représentation interne du but à l’ordina- 
teur est assurée par l’ensemble des deux heuristiques du programme. Et 
l'efficacité maximale est obtenue lorsque ces deux heuristiques s’épau- 
lent mutuellement, comme en témoigne la progression des étapes E7 à 
E13, ou mieux E28. Dans ce dernier cas, les deux incitations au but conver- 
gent parfaitement. 

En amont, on trouve d’abord les dégagements B, C et D parfaitement 
neutres de E7, E8 et E9, qui laissent tout le travail intelligent à leur mal- 
heureuse heuristique de navigation et se contentent bêtement de se sor- 
tir des guêpiers successifs ; puis apparaissent les dégagements E, F et I, 
de plus en plus coopératifs, G et H n'étant que des neutres un peu plus 
évolués. D'ailleurs, si I est si efficace, c’est qu’elle exploite elle-même 
l’heuristique 1 à seconder. 

On pourrait très bien imaginer un programme avec deux heuristiques 
antagonistes. C’est ce qui se produirait en E24 lorsque l'opérateur appuie 
sur la touche 4 — appelant ainsi l’heuristique de fuite 4 — si l’on adop- 
tait l’heuristique de dégagement F au lieu de C. Il est facile de compren- 
dre que, dans un tel cas, compte tenu de la densité relativement faible 
des piliers, c’est toujours l'influence de l’heuristique de navigation qui 
finit par l’emporter ; lorsqu'il n’y a pas trop de danger, les ruades des 
soldats ne sont pas assez fréquentes pour empêcher le général d’arriver 
à ses fins. 

Pour en ÉSvCR à la définition du but, il faut observer qu’en fait un 
programme comme E7 n’a pas un but unique : faire rejoindre le maître 
par le robot. Il se propose aussi, pour ne pas dire surtout, de donner à 
l'observateur le spectacle de ses démarches mentales et de la trajectoire 
qui en résulte. Et ces buts annexes sont justement l’objet de toutes les 
autres instructions du programme. 


— 219 — 


Ainsi, en définitive, le ou les ‘‘buts’’ du programme sont disséminés 
tout au long de celui-ci, ils l’imprègnent totalement et en constituent 
la substance même : un programme n’est qu’un immense but compo- 
site, comportant des buts étapes traduits par la séquence des instructions. 

Il en est inévitablement ainsi avec tous les langages et tous les pro- 
grammes : dans les systèmes experts, par exemple, c’est le moteur d’infé- 
rence qui contient les buts du système ; comme chacun a les siens, toujours 
peu ou prou différents de ceux du voisin, il paraît très douteux que l’on 
puisse un jour, ainsi que certains chercheurs l’espèrent, bâtir un moteur 
d’inférence valable pour toutes les applications au nom de l’unité supé- 
rieure de la pensée. 

Il y faudrait en amont une unité supérieure des buts, donc des besoins, 
des désirs et des volontés, ni réelle ni souhaitable. 
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CONCLUSION 


Fermons la boucle et dansons la farandole. 

La compréhension est une invention artificielle et autoréférentielle de 
l'intelligence humaine. 

Les plantes et les animaux sont exempts de tous risques d’incompré- 
hension, car ils vivent naturellement, sans se targuer de prétendument 
comprendre ce qu’ils sont ni ce qu’ils font. 

Le clivage entre le comportement naturel : penser pour vivre, et le 
comportement humain se situe dès le premier niveau de la contempla- 
tion de nous-mêmes, la réflexion révélant ainsi sa vraie nature : une per- 
version du comportement, vivre pour penser. 

L'on pourrait soupçonner la Nature de nous avoir dotés là d’une espèce 
de capuchon cérébral étanche et réflecteur qui nous fait prendre le dedans 
pour le dehors, le reflet pour la chose. Ce que notre intelligence nous 
livre en fait de secrets de l'Univers réel, c’est une série de clichés pris 
à l’aide d’un objectif braqué vers l’arrière. 

De réflexions sur les situations en réflexions sur la réflexion des situa- 
tions, nous sommes la proie de vertigineux aller et retour par le jeu des 
multiples miroirs déformants dans lesquels nous sommes enfermés. 

Nos sens ouvrent bien quelques fenêtres sur l'extérieur, mais les rais 
qui, ainsi, nous parviennent sont aussitôt engloutis, déviés, piégés dans 
des prismes obtus, tordus, ou focalisés dans de folles lentilles, et sans cesse 
projetés sur les écrans mouvants de nos représentations personnelles. 

Nous sommes des boîtes noires du monde, dont les incohérents signaux 
de sortie n’ont aucune corrélation avec la divine simplicité du milieu qui 
nous baigne et dans lequel notre corps, hors notre tête, se sent si à l’aise. 

Mais, n'ayant pas arrêté là son inexorable processus sédimentaire, la 
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Nature a posé sur cette première carapace neuronique une deuxième cou- 
che, puis une troisième..., les êtres les plus intelligents bénéficiant de 
la plus forte épaisseur. Le système est génial dans sa stupidité ; il suffit 
d’empiler sans s'occuper de ce qui bouillonne en dessous. 

Alors, la partie se complique encore, indéfiniment, car des interac- 
tions nouvelles interviennent ; cela se réfracte, cela fuse et filtre, résonne 
et s’amplifie, frotte et s’échauffe, ou s'éteint. 

Des niveaux supplémentaires de pensées se pressent en hordes sauva- 
ges et les miroitements initiaux prennent la consistance de reflets du 
deuxième ordre, puis du troisième. 

Éblouis, nous pensons avoir compris que nous sommes destinés à 
comprendre. L’organe à créé la fonction. 

Pour saisir le sens de cette conclusion, il te faut, lecteur, retourner à 
son début, car la porte ne s'ouvre que sur l’intérieur. 

Nous nous retrouverons alors ici dans un instant, goguenards et éter- 
nellement voués à des cascades de clins d'œil. 

Roméo et Juliette vont de leur côté, heureux d’ignorer leur ignorance 
et seulement décidés à foncer l’un vers l’autre, bercés par la douce musi- 
que de leurs heuristiques, créatures de créature, aussi insaisissables que 
le reflet d’un arc-en-ciel. 
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ANNEXE I 


TABLEAU DES HEURISTIQUES 


UTILISÉES PAR LES ROBOTS 
DANS LE COURS DU LIVRE 


Heuristiques de navigation 


Direction des pas liée à la valeur de la pente de la droite joi- 
gnant le robot à sa cible : 


si pente inférieure à 50 %, pas horizontal 
si pente supérieure à 200 %, pas vertical 
si pente intermédiaire, pas en diagonale 


Heuristique 1 simplifiée : 
si robot et cible sur même ligne, pas horizontal 


si robot et cible sur même colonne, pas vertical 
dans autres cas, pas en diagonale 


Heuristique 1 avec marge de hasard 
Heuristique 1 en négatif (fuite) 


Heuristique 2 en négatif 





Heuristique 2 avec anticipation sur mouvement de la cible 


Heuristiques de dégagement des obstacles 


Tentatives uniformes de direction nord-est 
Tentatives toutes tirées au hasard 


Première tentative tirée au hasard, puis exploration circulaire 
dans un sens tiré au hasard 


Comme C avec interdiction de retour sur position précédente, 
sauf si c’est la seule position libre 





Comme D en commençant l'exploration circulaire à partir de 
l'obstacle 


Comme E avec exploration dans les deux sens de rotation 
puis choix de la meilleure position par fonction d'évaluation 


Double dégagement suivant C 





Saut d’une case suivant C 


Heuristique F avec anticipation à profondeur 1 








Étapes 


toutes sauf 
cas particuliers 


E4, ES, E24 
E30, E33 


EG 
E7 


ES, E16, E18, 
E19, E20, E24 


E9, E10, El1 


E12 


E13, El4, E15, 
E25, E26, E30, 
E31, E32 


E17, E21, E22, 
E23 


E24 
E28, E29 





ANNEXE II 


RÉPERTOIRE DE TERMES CLÉS UTILISÉS 


actif 

aléatoire 
algorithme 
anticipation 
apprentissage 
arbre 

argument 
artificielle 

banc d'essai 
boucle 
dégagement 
déterminisme 
distance 
environnement 
évaluation 
faim 

flou 

fonction logique 


fonction 
d'évaluation 


Güdel 
heuristique 





Chapitre 
ou étape 


Chapitre 
ou étape 


Terme 





E16 
El 
E4 
IX 





identification E1 


indéterminisme |E8 
inférence III 
E24 


isomorphisme IV 


interactivité 





langage I 
libre arbitre E7 
logarithmique ES 
métaconnaissance 
navigation E4 
odorat 

ouïe 

pas 

passif 

piste d’essai 

prédicat 

programme 


proposition 


qualitatif 


règles 
représentation 


EE 








robotique 

sens 

simulation 
social 

tableau indicé 
toucher 

tricher 

Turing 

variable indicée 


vue 





Chapitre 
ou étape 





ANNEXE III 


FORMULATION GÉNÉRALE DES HEURISTIQUES 
DU ROBOT 


En parcourant les étapes, en particulier E4 et E13, nous avons dégagé le comporte- 
ment idéal du robot, qui peut être défini d’une manière très simple. 

Plaçons-le dans une case d’écran située horizontalement à H cases de celle du maître, 
et verticalement à V cases de celle de ce maître. 

Nous avons vu que, dans ces conditions, la vraie distance que le robot doit franchir, 
exprimée en nombre minimal de pas, est égale à la plus grande des deux distances H 
ou V. Appelons R cette distance réelle. 

Le comportement idéal du robot consiste donc, pour chacun de ses pas, à faire dimi- 
nuer R d’une unité. Si par exemple H vaut 20 et V vaut 8, il est nécessaire et suffisant 
de ramener H à 19, V pouvant prendre quant à elle indifféremment les valeurs 8, 9 ou 
7, ce qui laisse au robot un libre arbitre entre trois positions d’égale qualité. C’est ce 
qui explique l’égale efficacité des trois méthodes rappelées en E4, et il en existe bien 
d’autres qui les valent. 

Le même principe préside à la progression des heuristiques de dégagement et au choix 
de la fonction d'évaluation de E13. Il permet par ailleurs d'envisager la conception d’une 
heuristique globale navigation- -dégagement consistant, pour chaque pas, à explorer les 
trois positions équivalentes possibles ! et à adopter indifféremment l’une de celles qui 
sont libres. Si aucune n’est libre, on se rabat sur l’une des trois positions pour lesquelles 
la distance R, faute de diminuer, reste constante, et ainsi de suite. 

On peut bien entendu greffer sur cette heuristique une anticipation de profondeur 
quelconque. Notons enfin qu’elle n’a rien de commun avec l’heuristique globale évo- 
quée au début du Chapitre X, basée sur la vision de l’environnement. 

Sur un autre plan, on aura noté que tous les déplacements des robots du livre sont 
fondés sur une règle constante, le franchissement obligatoire d’une seule case à chaque 
pas. C’est une démarche naturelle, anthropocentrique, et dont tout esprit créatif doit 
songer à sortir au plus vite. 

Imaginons par exemple que nous sommes les cavaliers, ou les pions, ou les fous, ou 
les tours, ou la dame du jeu d'échecs, et non plus le roi comme jusqu’à maintenant, 
et nous pourrons forger toute une gamme de nouvelles heuristiques entièrement diffé- 
rentes et assister à des trajectoires inattendues, faisant intervenir à loisir l’ensemble des 
concepts présentés : comportements élémentaires, fonctions d'évaluation, apprentissage, 
anticipation. 

Nous verrions ainsi que les intellects du kangourou, du crabe ou du rhinocéros n’ont 
aucune raison de ressembler à celui des hommes, mais que ceux-ci sont aptes à les simu- 
ler tous. 


1. En prenant garde au fait que, si H et V ne diffèrent que de 1, il n’y a plus que deux bonnes 
positions possibles, et une seule si H et V sont égales. 
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Contrairement à certaines idées reçues, il n’est nullement 
nécessaire de disposer d’un ordinateur spécial, d’un langage 
ésotérique ni de circonvolutions cervicales exceptionnelles 
pour pratiquer, dans de sages limites, l'intelligence Artifi- 
cielle. 

Un bon micro-ordinateur, équipé d'un honnête BASIC, per- 
met, pourvu que les thèmes traités s'y prêtent, une acquisi- 
tion des principaux concepts de cette prodigieuse disci- 
pline. 

Tel est l'objectif de ce livre au fil duquel des corps mobiles 
sont dotés sur l'écran de comportements surprenants les 
hissant au niveau de robots intelligents. 

Mais, le plus étonnant, ce sont parfois les idées que ces 
petites créatures nous donnent sur les hommes. C’est pour- 
quoi la langue française tient à apparaître dans cet ouvrage 
comme le plus évolué des langages de l'informatique. 
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